Как установить рабочий каталог по умолчанию в Emacs - устранение неполадок

Question

Я знаю, что это было опубликовано много раз, но решения для меня не работают. Я попытался следующие решения с этого поста (Changing the default folder in Emacs):

• Решение 1: Добавить (cd "C:/Users/Name/Desktop") в файл .emacs
• Решение 2: Добавить (setq default-directory "C:/Documents and Settings/USER NAME/Desktop/") в файл .emacs
• Решение 3: Щелкните правой кнопкой мыши emacs short cut, hit properties и изменить начало в поле на нужный каталог.

и только решение 3 работает. К сожалению, мне нужно использовать либо раствор 1 или 2.

Я считаю, что мой .emacs файл является правильным, потому что моя тема быть правильно загружена/порожнее, когда я добавить/удалить (load-theme 'light-blue t) из файла .emacs.

Вот мой последний .emacs файл:

(message "Default Dir: %S" default-directory) 
(setq-default default-directory "C:/Users/Lucas/") 
(message "Default Dir: %S" default-directory) 
(setq-default indent-tabs-mode nil) 
(add-hook 'ruby-mode-hook 
     (lambda() 
     (define-key ruby-mode-map "\C-c#" 'comment-or-uncomment-region) 
     ) 
) 
(defadvice comment-or-uncomment-region (before slick-comment activate compile) 
    "When called interactively with no active region, comment a single line instead." 
    (interactive 
    (if mark-active (list (region-beginning) (region-end)) 
    (list (line-beginning-position) 
     (line-beginning-position 2))))) 
(load-theme 'light-blue t) 
;setq default-directory "~/") 
(setq-default default-directory "C:/Users/Lucas/") 

(defun xp-read-file-name (prompt &optional dir default-filename mustmatch initial predicate) 
(setq last-nonmenu-event nil) 
    (funcall (or read-file-name-function #'read-file-name-default) 
      prompt dir default-filename mustmatch initial predicate)) 

(defun xp-save-as (filename &optional confirm) 
    (interactive 
    (list (if buffer-file-name 
     (xp-read-file-name "Write file: " nil nil nil nil) 
    (xp-read-file-name "Write file: " "C:/Users/Lucas/" 
     (expand-file-name 
      (file-name-nondirectory (buffer-name)) 
      "C:/Users/Lucas/") 
     nil nil)) 
    (not current-prefix-arg))) 
    (or (null filename) (string-equal filename "") 
     (progn 
    (if (file-directory-p filename) 
     (setq filename (concat (file-name-as-directory filename) 
      (file-name-nondirectory 
      (or buffer-file-name (buffer-name)))))) 
    (and confirm 
     (file-exists-p filename) 
     (not (and (eq (framep-on-display) 'ns) 
      (listp last-nonmenu-event) 
      use-dialog-box)) 
     (or (y-or-n-p (format "File `%s' exists; overwrite? " filename)) 
    (error "Canceled"))) 
    (set-visited-file-name filename (not confirm)))) 
    (set-buffer-modified-p t) 
    (and buffer-file-name 
     (file-writable-p buffer-file-name) 
     (setq buffer-read-only nil)) 
    (save-buffer) 
    (vc-find-file-hook)) 
(defun comment-or-uncomment-region-or-line() 
    "Comments or uncomments the region or the current line if there's no active region." 
    (interactive) 
    (let (beg end) 
     (if (region-active-p) 
      (setq beg (region-beginning) end (region-end)) 
      (setq beg (line-beginning-position) end (line-end-position))) 
     (comment-or-uncomment-region beg end) 
     (next-line))) 
(global-set-key (kbd "C-x C-;") 'comment-region) 
(setq lazy-highlight-cleanup nil) 
(message "Default Dir: %S" default-directory) 

Мои emacs.exe сохраняется под C:\emacs\emacs-24.3\bin (который также мой каталог по умолчанию, но я хочу, чтобы изменить его C:/Users/Lucas/), и мой .emacs находится под моим домом - C:\Users\Lucas.

UPDATE

Недавно я узнал, что моя команда (setq-default default-directory "C:/Users/Lucas/"), которая должна установить свой default-directory, не выполняет. Сразу после запуска, это мой *Messages* буфер:

Default Dir: "C:\\emacs\\emacs-24.3\\bin/" [3 times] 
For information about GNU Emacs and the GNU system, type C-h C-a. 

Он ведет себя так, как будто я перекрывая файл .emacs. Я проверял дважды/тройку, и я не могу найти еще один .emacs на моем пути. Кроме того, я не запускаю Emacs из ярлыка. Мы ценим любые предложения. Спасибо за поддержку.

Answer 1

С моей настройкой на OSX, каталог по умолчанию для буфера для посещения без файлов совпадает с моим user-emacs-directory.

У меня есть различные функции для использования разных каталогов - например, при открытии файла или сохранении файла. Вот несколько примеров того, как изменить местоположение сохранения при использовании Emacs в Windows и еще один пример для OSX. Переменная default-directory используется для xp-save-as, но вы можете установить ее на все, что хотите - даже положите ее в кавычки "C:/Documents and Settings/USER NAME/Desktop/".

---

Windows, например:

(defun xp-read-file-name (prompt &optional dir default-filename mustmatch initial predicate) 
(setq last-nonmenu-event nil) 
    (funcall (or read-file-name-function #'read-file-name-default) 
      prompt dir default-filename mustmatch initial predicate)) 

(defun xp-save-as (filename &optional confirm) 
    (interactive 
    (list (if buffer-file-name 
     (xp-read-file-name "Write file: " nil nil nil nil) 
    (xp-read-file-name "Write file: " default-directory 
     (expand-file-name 
      (file-name-nondirectory (buffer-name)) 
      default-directory) 
     nil nil)) 
    (not current-prefix-arg))) 
    (or (null filename) (string-equal filename "") 
     (progn 
    (if (file-directory-p filename) 
     (setq filename (concat (file-name-as-directory filename) 
      (file-name-nondirectory 
      (or buffer-file-name (buffer-name)))))) 
    (and confirm 
     (file-exists-p filename) 
     (not (and (eq (framep-on-display) 'ns) 
      (listp last-nonmenu-event) 
      use-dialog-box)) 
     (or (y-or-n-p (format "File `%s' exists; overwrite? " filename)) 
    (error "Canceled"))) 
    (set-visited-file-name filename (not confirm)))) 
    (set-buffer-modified-p t) 
    (and buffer-file-name 
     (file-writable-p buffer-file-name) 
     (setq buffer-read-only nil)) 
    (save-buffer) 
    (vc-find-file-hook)) 

---

OSX пример:

(defun ns-lawlist-save-as() 
(interactive) 
    (let ((filename (ns-read-file-name "Write file: " (if buffer-file-name (file-name-directory buffer-file-name)) nil (if buffer-file-name (file-name-nondirectory buffer-file-name) "Untitled")))) 
    (and filename (write-file (expand-file-name filename))))) 

Answer 2

Я думаю, вам просто нужно использовать правильный обратный слэш (и избежать их). Это сработало в моем.Emacs:

(SETQ по умолчанию-каталог "C: \ Windows")

Answer 3

Из того, что вы пишете, это звучит, как вы работаете окна. Вы подтвердили, что emacs на самом деле находит и загружает .emacs из каталога C: \ Users \ Lucas? Если это так, значит, Windows понимает, что ваш домашний каталог - C: \ Users \ Lucas. Вы можете проверить это, посмотрев переменную среды HOME. В Emacs, попробуйте:

(getenv "HOME") 

В файле .emacs, можно затем поставить:

(setq default-directory "~/") 

Answer 4

Установите ваш default-directoryпоследний в вашем файле инициализации, если вы ожидаете, что установка будет полезно после загрузки файла инициализации.

Если вам также необходимо установить его ранее в файле инициализации (например, так, чтобы часть кода инициализационного файла получила правильное значение), установите его и раньше. Когда вы делаете материал в файле инициализации, этот материал может изменить значение переменной.

Вы также можете использовать (setq-default default-directory "C:/Documents and Settings/USER NAME/Desktop/") (или любое другое имя каталога), если вы хотите, чтобы это значение по умолчанию для каждого буфера.

Answer 5

Вот что я сделал, и работал без проблем:

setq default-directory "C:\\Path\\To\\Directory\\" 

Сохраненный и возобновлен. Я думаю, что в окнах env вам нужно иметь двойные обратные черточки.

Answer 6

Я только что протестировал, и он отлично поступил в отношении Default-Directory. Мои настройки следующим образом:

emacs.exe в c:\bin\emacs\bin

%PATH% включает c:\bin\emacs\bin\

%HOME% набор для %USERPROFILE (C: \ Users \)

Напрямую от Run коробки

Win + remacs -qRET

(message "%s" default-directory) => "C: \ Users \ jonpe /"

Из ЦМД.ехе после изменения каталога

Win + RcmdRET

cd c:\users\publicRET

emacs -qRET

(message "%s" default-directory) => «C: \ Users \ Public/"

У вас есть emacs, добавленные в вашу переменную %PATH%?

Если я попытаюсь запустить emacs, просмотрев его местоположение, тогда запуск каталога по умолчанию будет установлен в исполняемое местоположение.

Answer 7

Я страдаю от подобной странности с помощью Emacs 24.3.1 на Windows 10. Решение еще более странное: настройте Emacs для запрета запуска экрана. Это можно сделать с помощью кнопки запуска настройки, так что вы в конечном итоге следующее в ваш .emacs: (., Например, изменить т всухую выше)

(custom-set-variables 
;; custom-set-variables was added by Custom. 
;; If you edit it by hand, you could mess it up, so be careful. 
;; Your init file should contain only one such instance. 
;; If there is more than one, they won't work right. 
'(inhibit-startup-screen t)) 

С экрана запуска вместо ярлыка для Windows «Пуск в «поле (установленное в« E: \ Users \ Rob \ ») доминирует, а Ctrl-x Ctrl-f дает E: \ Users \ Rob/(обратите внимание на странные направления слэш).

С экрана запуска тормозится (т выше) .emacs

(setq default-directory "E:/Users/Rob/me/") 

доминирует и Ctrl-х Ctrl-F дает E:/Users/Rob/меня/(все косые черты).

Answer 8

Проблема для меня была Начальный экран запуска emacs.

Это может быть деактивирован:

;; no startup msg 
(setq inhibit-startup-message t) 

Кажется, что по умолчанию в окне приветствия в Emacs (с учебником ссылок) заставляет вас начать в вашем $HOME пути.

---

После этого вы можете либо cd или setq default-directory так:

(setq default-directory "~/") 

или

(cd "~/")