improve instructions in Commentary

stsquad · Nov 5, 2011 · 790bbdb · 790bbdb
1 parent 1e78f9f
commit 790bbdb
Showing 1 changed file with 15 additions and 19 deletions.
diff --git a/servers/edit-server.el b/servers/edit-server.el
@@ -29,45 +29,41 @@
 ;; Emacs Chrome plugin. This is my first attempt at doing something
 ;; with sockets in Emacs. I based it on the following examples:
 ;;
-;; http://www.emacswiki.org/emacs/EmacsEchoServer
-;; http://nullprogram.com/blog/2009/05/17/
+;;   http://www.emacswiki.org/emacs/EmacsEchoServer
+;;   http://nullprogram.com/blog/2009/05/17/
 ;;
 ;; To use it ensure the file is in your load-path and add something
 ;; like the following examples to your .emacs:
 ;;
 ;; To open pages for editing in new buffers in your existing Emacs
 ;; instance:
 ;;
-;; (if (locate-library "edit-server")
-;;		(progn
-;;			(require 'edit-server)
-;;			(setq edit-server-new-frame nil)
-;;			(edit-server-start)))
+;;   (when (require 'edit-server nil t)
+;;     (setq edit-server-new-frame nil)
+;;     (edit-server-start))
 ;;
 ;; To open pages for editing in new frames using a running emacs
 ;; started in --daemon mode:
 ;;
-;; (if (and (daemonp) (locate-library "edit-server"))
-;;		 (progn
-;;			 (require 'edit-server)
-;;			 (edit-server-start)))
+;;   (when (and (require 'edit-server nil t) (daemonp))
+;;     (edit-server-start))
 ;;
 ;; Buffers are edited in `text-mode' by default; to use a different
-;; mode, change `edit-server-default-major-mode' or customize
-;; `edit-server-url-major-mode-alist' to specify major modes based on
-;; the remote URL:
+;; major mode, change `edit-server-default-major-mode' or customize
+;; `edit-server-url-major-mode-alist' to specify major modes based
+;; on the remote URL:
 ;;
-;; (setq edit-server-url-major-mode-alist
-;;   '(("github\\.com" . markdown-mode)))
+;;   (setq edit-server-url-major-mode-alist
+;;         '(("github\\.com" . markdown-mode)))
 ;;
 ;; Alternatively, set the mode in `edit-server-start-hook'.  For
 ;; example:
 ;;
 ;; (add-hook 'edit-server-start-hook
 ;;           (lambda ()
-;;             (if (string-match "github.com" (buffer-name))
-;;                 (markdown-mode))))
-;;
+;;             (when (string-match "github.com" (buffer-name))
+;; 	      (markdown-mode))))
+
 
 ;;; Code: