.emacs-my
changeset 394 03d8b85ff815
parent 393 83d501952356
child 397 c743dacafbce
equal deleted inserted replaced
393:83d501952356 394:03d8b85ff815
   149 
   149 
   150 ;; (load "~/emacs/bin/gnuserv/gnuserv.el")
   150 ;; (load "~/emacs/bin/gnuserv/gnuserv.el")
   151 ;; (require 'gnuserv)
   151 ;; (require 'gnuserv)
   152 ;; (setq gnuserv-frame (selected-frame))
   152 ;; (setq gnuserv-frame (selected-frame))
   153 
   153 
   154 (require 'server)
       
   155 (when (and (= emacs-major-version 23) (= emacs-minor-version 1) (equal window-system 'w32))
       
   156   (defun server-ensure-safe-dir (dir) "Noop" t)) ; Suppress error directory ~/.emacs.d/server is unsafe on windows.
       
   157 
       
   158 (when (>= emacs-major-version 22)
   154 (when (>= emacs-major-version 22)
   159   (server-start))
   155   (require 'server)
       
   156   (when (and (= emacs-major-version 23) (=> emacs-minor-version 1) (=< emacs-minor-version 2) (equal window-system 'w32))
       
   157     (defun server-ensure-safe-dir (dir) "Noop" t)) ; Suppress error directory ~/.emacs.d/server is unsafe on windows.
       
   158   (server-start)
       
   159   )
   160 
   160 
   161 ;; (desktop-load-default)
   161 ;; (desktop-load-default)
   162 ;; (desktop-read)
   162 ;; (desktop-read)
   163 
   163 
   164 ;; ======================================================================
   164 ;; ======================================================================