.emacs-my
changeset 1204 4f9828e2c186
parent 1202 17ed3f571ca4
parent 1203 2d151ab6761d
child 1206 4de7a444cf35
equal deleted inserted replaced
1202:17ed3f571ca4 1204:4f9828e2c186
   487 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   487 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   488 (message "server")
   488 (message "server")
   489 
   489 
   490 (when (and (>= emacs-major-version 22) (not (eq system-type 'cygwin)))
   490 (when (and (>= emacs-major-version 22) (not (eq system-type 'cygwin)))
   491   (require 'server)
   491   (require 'server)
   492   (when (and (= emacs-major-version 23) (>= emacs-minor-version 1) (<= emacs-minor-version 2) (equal window-system 'w32))
   492   (when (and (>= emacs-major-version 23) (equal window-system 'w32))
   493     (defun server-ensure-safe-dir (dir) "Noop" t)) ; Suppress error directory ~/.emacs.d/server is unsafe on windows.
   493     (defun server-ensure-safe-dir (dir) "Noop" t)) ; Suppress error directory ~/.emacs.d/server is unsafe on windows.
   494   (when (or (= emacs-major-version 22) (not (eq (server-running-p server-name) t)))
   494   (when (or (= emacs-major-version 22) (not (eq (server-running-p server-name) t)))
   495     (server-start))
   495     (server-start)) )
   496   )
       
   497 
   496 
   498 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   497 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   499 (message "standart/general settings")
   498 (message "standart/general settings")
   500 
   499 
   501 ;; Try to speed things up, especially in VM.
   500 ;; Try to speed things up, especially in VM.