.emacs-my
changeset 766 31b6b63917df
parent 764 1e356bb92737
child 767 47c2dbdb69dd
equal deleted inserted replaced
765:bbeae3f53afa 766:31b6b63917df
    10 ;; For load order see README.
    10 ;; For load order see README.
    11 
    11 
    12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    13 (message "recentf")
    13 (message "recentf")
    14 
    14 
       
    15 (setq recentf-save-file "~/.recentf")
       
    16 (when (eq system-type 'cygwin)
       
    17   (setq recentf-save-file "~/.recentf-cygwin")
       
    18   )
    15 (require 'recentf)
    19 (require 'recentf)
    16 ;; Prevent TRAMP to login on remote host when loading.
    20 ;; Prevent TRAMP to login on remote host when loading.
    17 ;; Its take time and ask passwords!
    21 ;; Its take time and ask passwords!
    18 (setq recentf-auto-cleanup 'never)
    22 (setq recentf-auto-cleanup 'never)
    19 (recentf-mode t)
    23 (recentf-mode t)
   354 (add-hook 'text-mode-hook (lambda () (setq require-final-newline nil)))
   358 (add-hook 'text-mode-hook (lambda () (setq require-final-newline nil)))
   355 
   359 
   356 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   360 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   357 (message "server")
   361 (message "server")
   358 
   362 
   359 (when (>= emacs-major-version 22)
   363 (when (and (>= emacs-major-version 22) (not (eq system-type 'cygwin)))
   360   (require 'server)
   364   (require 'server)
   361   (when (and (= emacs-major-version 23) (>= emacs-minor-version 1) (<= emacs-minor-version 2) (equal window-system 'w32))
   365   (when (and (= emacs-major-version 23) (>= emacs-minor-version 1) (<= emacs-minor-version 2) (equal window-system 'w32))
   362     (defun server-ensure-safe-dir (dir) "Noop" t)) ; Suppress error directory ~/.emacs.d/server is unsafe on windows.
   366     (defun server-ensure-safe-dir (dir) "Noop" t)) ; Suppress error directory ~/.emacs.d/server is unsafe on windows.
   363   (when (or (= emacs-major-version 22) (not (eq (server-running-p server-name) t)))
   367   (when (or (= emacs-major-version 22) (not (eq (server-running-p server-name) t)))
   364     (server-start))
   368     (server-start))
  1924 ;; Note: if you kill unsaved file auto save file not deleted.
  1928 ;; Note: if you kill unsaved file auto save file not deleted.
  1925 (setq delete-auto-save-files t)
  1929 (setq delete-auto-save-files t)
  1926 
  1930 
  1927 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1931 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1928 ;; Save and restore my buffers every time.
  1932 ;; Save and restore my buffers every time.
  1929 (setq desktop-dirname "~/.emacs.d")
  1933 
       
  1934 (setq desktop-base-file-name ".emacs.desktop")
       
  1935 (setq desktop-base-lock-name ".emacs.desktop.lock")
       
  1936 (when (eq system-type 'cygwin)
       
  1937   (setq desktop-base-file-name ".emacs.desktop-cygwin")
       
  1938   (setq desktop-base-lock-name ".emacs.desktop-cygwin.lock")
       
  1939   )
       
  1940 
  1930 (when (>= emacs-major-version 22)
  1941 (when (>= emacs-major-version 22)
  1931   (desktop-save-mode 1)
  1942   (desktop-save-mode 1)
  1932   )
  1943   )
  1933 
  1944 
  1934 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  1945 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;