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 --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4ea3fcf..c46604e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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 --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 47e0e0b..2df9f7c 100644 (file)
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -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 --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el
index ced5f21..336ffda 100644 (file)
--- a/lisp/net/ange-ftp.el
+++ b/lisp/net/ange-ftp.el
@@ -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 --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el
index 77392de..261b765 100644 (file)
--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -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 --git a/lisp/net/goto-addr.el b/lisp/net/goto-addr.el
index 1eb322e..182758a 100644 (file)
--- a/lisp/net/goto-addr.el
+++ b/lisp/net/goto-addr.el
@@ -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 --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 09a3392..8a3ec55 100644 (file)
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -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 --git a/lisp/net/xesam.el b/lisp/net/xesam.el
index fb68ded..03c1880 100644 (file)
--- a/lisp/net/xesam.el
+++ b/lisp/net/xesam.el
@@ -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 --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog
index 10e9464..7309402 100644 (file)
--- a/lisp/url/ChangeLog
+++ b/lisp/url/ChangeLog
@@ -1,6 +1,6 @@
 2010-03-12  Chong Yidong  <cyd@stupidchicken.com>
 
-       * url-vars.el (url): Put in net group.
+       * url-vars.el (url): Put in comm group.
 
 2010-03-10  Chong Yidong  <cyd@stupidchicken.com>
 

diff --git a/lisp/url/url-vars.el b/lisp/url/url-vars.el
index 3db5459..1b9fd7b 100644 (file)
--- a/lisp/url/url-vars.el
+++ b/lisp/url/url-vars.el
@@ -30,7 +30,7 @@
 (defgroup url nil
   "Uniform Resource Locator tool."
   :version "22.1"
-  :group 'net)
+  :group 'comm)
 
 (defgroup url-file nil
   "URL storage."