# HG changeset patch # User Chong Yidong # Date 1268421218 18000 # Node ID 3c0cd76e49fff57fdcac8207e5ea0a891e98b90e # Parent 904ccd8f2acb72f87658ff2e62d6c9c6584e4e24 Fix last change to use existing comm Custom group instead of `net'. * cus-edit.el (net): Remove group. (comm): Promote to top-level group. * url/url-vars.el (url): * net/browse-url.el (browse-url): * net/xesam.el (xesam): * net/tramp.el (tramp): * net/goto-addr.el (goto-address): * net/ange-ftp.el (ange-ftp): Put in comm group. diff -r 904ccd8f2acb -r 3c0cd76e49ff lisp/ChangeLog --- a/lisp/ChangeLog Fri Mar 12 12:47:22 2010 -0500 +++ b/lisp/ChangeLog Fri Mar 12 14:13:38 2010 -0500 @@ -2,13 +2,13 @@ * cus-edit.el (processes): Remove from development group. (oop, hypermedia): Delete group. - (net): New group. + (comm): Promote to top-level group. * net/browse-url.el (browse-url): * net/xesam.el (xesam): * net/tramp.el (tramp): * net/goto-addr.el (goto-address): - * net/ange-ftp.el (ange-ftp): Put in net group. + * net/ange-ftp.el (ange-ftp): Put in comm group. * view.el (view): Remove from editing group. diff -r 904ccd8f2acb -r 3c0cd76e49ff lisp/cus-edit.el --- a/lisp/cus-edit.el Fri Mar 12 12:47:22 2010 -0500 +++ b/lisp/cus-edit.el Fri Mar 12 14:13:38 2010 -0500 @@ -192,8 +192,9 @@ "Interfacing to external utilities." :group 'emacs) -(defgroup net nil - "Networking support." +(defgroup comm nil + "Communications, networking, and remote access to files." + :tag "Communication" :group 'emacs) (defgroup processes nil @@ -274,11 +275,6 @@ "Fitting Emacs with its environment." :group 'emacs) -(defgroup comm nil - "Communications, networking, remote access to files." - :tag "Communication" - :group 'environment) - (defgroup hardware nil "Support for interfacing with miscellaneous hardware." :group 'environment) diff -r 904ccd8f2acb -r 3c0cd76e49ff lisp/net/ange-ftp.el --- a/lisp/net/ange-ftp.el Fri Mar 12 12:47:22 2010 -0500 +++ b/lisp/net/ange-ftp.el Fri Mar 12 14:13:38 2010 -0500 @@ -676,7 +676,7 @@ "Accessing remote files and directories using FTP made as simple and transparent as possible." :group 'files - :group 'net + :group 'comm :prefix "ange-ftp-") (defcustom ange-ftp-name-format diff -r 904ccd8f2acb -r 3c0cd76e49ff lisp/net/browse-url.el --- a/lisp/net/browse-url.el Fri Mar 12 12:47:22 2010 -0500 +++ b/lisp/net/browse-url.el Fri Mar 12 14:13:38 2010 -0500 @@ -216,7 +216,7 @@ :prefix "browse-url-" :link '(emacs-commentary-link "browse-url") :group 'external - :group 'net) + :group 'comm) ;;;###autoload (defcustom browse-url-browser-function diff -r 904ccd8f2acb -r 3c0cd76e49ff lisp/net/goto-addr.el --- a/lisp/net/goto-addr.el Fri Mar 12 12:47:22 2010 -0500 +++ b/lisp/net/goto-addr.el Fri Mar 12 14:13:38 2010 -0500 @@ -76,7 +76,7 @@ (defgroup goto-address nil "Click to browse URL or to send to e-mail address." :group 'mouse - :group 'net) + :group 'comm) ;; I don't expect users to want fontify'ing without highlighting. diff -r 904ccd8f2acb -r 3c0cd76e49ff lisp/net/tramp.el --- a/lisp/net/tramp.el Fri Mar 12 12:47:22 2010 -0500 +++ b/lisp/net/tramp.el Fri Mar 12 14:13:38 2010 -0500 @@ -176,7 +176,7 @@ (defgroup tramp nil "Edit remote files with a combination of rsh and rcp or similar programs." :group 'files - :group 'net + :group 'comm :version "22.1") ;; Maybe we need once a real Tramp mode, with key bindings etc. diff -r 904ccd8f2acb -r 3c0cd76e49ff lisp/net/xesam.el --- a/lisp/net/xesam.el Fri Mar 12 12:47:22 2010 -0500 +++ b/lisp/net/xesam.el Fri Mar 12 14:13:38 2010 -0500 @@ -151,7 +151,7 @@ (defgroup xesam nil "Xesam compatible interface to search engines." :group 'extensions - :group 'net + :group 'comm :version "23.1") (defcustom xesam-query-type 'user-query diff -r 904ccd8f2acb -r 3c0cd76e49ff lisp/url/ChangeLog --- a/lisp/url/ChangeLog Fri Mar 12 12:47:22 2010 -0500 +++ b/lisp/url/ChangeLog Fri Mar 12 14:13:38 2010 -0500 @@ -1,6 +1,6 @@ 2010-03-12 Chong Yidong - * url-vars.el (url): Put in net group. + * url-vars.el (url): Put in comm group. 2010-03-10 Chong Yidong diff -r 904ccd8f2acb -r 3c0cd76e49ff lisp/url/url-vars.el --- a/lisp/url/url-vars.el Fri Mar 12 12:47:22 2010 -0500 +++ b/lisp/url/url-vars.el Fri Mar 12 14:13:38 2010 -0500 @@ -30,7 +30,7 @@ (defgroup url nil "Uniform Resource Locator tool." :version "22.1" - :group 'net) + :group 'comm) (defgroup url-file nil "URL storage."