equal
deleted
inserted
replaced
693 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
693 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
694 (message "server") |
694 (message "server") |
695 |
695 |
696 (eval-when 'compile (require 'server)) |
696 (eval-when 'compile (require 'server)) |
697 |
697 |
|
698 (when (equal window-system 'w32) |
|
699 ;; including cygwin here as socket in /tmp directory is a subject of cleanup... |
|
700 (setq server-use-tcp t)) |
698 (when (and (>= emacs-major-version 22)) |
701 (when (and (>= emacs-major-version 22)) |
699 (require 'server) |
702 (require 'server) |
700 (when server-use-tcp |
703 (when server-use-tcp |
701 (unless (file-directory-p server-auth-dir) |
704 (unless (file-directory-p server-auth-dir) |
702 (mkdir server-auth-dir))) |
705 (mkdir server-auth-dir))) |