[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r112597: Misc custom group fixes
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r112597: Misc custom group fixes |
Date: |
Wed, 15 May 2013 19:55:41 -0400 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 112597
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Wed 2013-05-15 19:55:41 -0400
message:
Misc custom group fixes
* cus-start.el (show-trailing-whitespace): Move to editing basics.
* faces.el (trailing-whitespace): Don't use whitespace-faces group.
* obsolete/old-whitespace.el (whitespace-faces): Remove group.
(whitespace-highlight): Move to whitespace group.
* comint.el (comint-source):
* pcmpl-linux.el (pcmpl-linux):
* shell.el (shell-faces):
* eshell/esh-opt.el (eshell-opt):
* international/ccl.el (ccl): Remove empty custom groups.
* completion.el (dynamic-completion-mode):
* jit-lock.el (jit-lock-debug-mode):
* minibuffer.el (completion-in-region-mode):
* type-break.el (type-break-mode-line-message-mode)
(type-break-query-mode):
* emulation/tpu-edt.el (tpu-edt-mode):
* progmodes/subword.el (global-subword-mode, global-superword-mode):
* progmodes/vhdl-mode.el (vhdl-electric-mode, vhdl-stutter-mode):
* term/vt100.el (vt100-wide-mode): Specify explicit :group.
* term/xterm.el (xterm): Change parent group to terminals.
* master.el (master): Remove empty custom group.
(master-mode): Remove unused :group argument.
* textmodes/refill.el (refill): Remove empty custom group.
(refill-mode): Remove unused :group argument.
* textmodes/rst.el (rst-compile-toolsets): Use rst-compile group.
* cedet/semantic/symref/list.el (semantic-symref-auto-expand-results)
(semantic-symref-results-mode-hook)
(semantic-symref-results-summary-function): Fix :group.
* erc/erc-list.el (erc-list):
* erc/erc-menu.el (erc-menu):
* erc/erc-ring.el (erc-ring): Define custom groups, for define-erc-module.
* gnus/shr-color.el (shr-color-visible-luminance-min)
(shr-color-visible-distance-min): Use shr-color group.
* url/url-news.el (url-news): Remove empty custom group.
modified:
lisp/ChangeLog
lisp/cedet/ChangeLog
lisp/cedet/semantic/symref/list.el
lisp/comint.el
lisp/completion.el
lisp/cus-start.el
lisp/emulation/tpu-edt.el
lisp/erc/ChangeLog
lisp/erc/erc-list.el
lisp/erc/erc-menu.el
lisp/erc/erc-ring.el
lisp/eshell/esh-opt.el
lisp/faces.el
lisp/gnus/ChangeLog
lisp/gnus/shr-color.el
lisp/international/ccl.el
lisp/jit-lock.el
lisp/master.el
lisp/minibuffer.el
lisp/obsolete/old-whitespace.el
lisp/org/org-pcomplete.el
lisp/pcmpl-linux.el
lisp/progmodes/subword.el
lisp/progmodes/vhdl-mode.el
lisp/shell.el
lisp/term/vt100.el
lisp/term/xterm.el
lisp/textmodes/refill.el
lisp/textmodes/rst.el
lisp/type-break.el
lisp/url/ChangeLog
lisp/url/url-news.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-05-15 23:35:10 +0000
+++ b/lisp/ChangeLog 2013-05-15 23:55:41 +0000
@@ -1,5 +1,35 @@
2013-05-15 Glenn Morris <address@hidden>
+ * cus-start.el (show-trailing-whitespace): Move to editing basics.
+ * faces.el (trailing-whitespace): Don't use whitespace-faces group.
+ * obsolete/old-whitespace.el (whitespace-faces): Remove group.
+ (whitespace-highlight): Move to whitespace group.
+
+ * comint.el (comint-source):
+ * pcmpl-linux.el (pcmpl-linux):
+ * shell.el (shell-faces):
+ * eshell/esh-opt.el (eshell-opt):
+ * international/ccl.el (ccl): Remove empty custom groups.
+
+ * completion.el (dynamic-completion-mode):
+ * jit-lock.el (jit-lock-debug-mode):
+ * minibuffer.el (completion-in-region-mode):
+ * type-break.el (type-break-mode-line-message-mode)
+ (type-break-query-mode):
+ * emulation/tpu-edt.el (tpu-edt-mode):
+ * progmodes/subword.el (global-subword-mode, global-superword-mode):
+ * progmodes/vhdl-mode.el (vhdl-electric-mode, vhdl-stutter-mode):
+ * term/vt100.el (vt100-wide-mode): Specify explicit :group.
+
+ * term/xterm.el (xterm): Change parent group to terminals.
+
+ * master.el (master): Remove empty custom group.
+ (master-mode): Remove unused :group argument.
+ * textmodes/refill.el (refill): Remove empty custom group.
+ (refill-mode): Remove unused :group argument.
+
+ * textmodes/rst.el (rst-compile-toolsets): Use rst-compile group.
+
* cus-dep.el: Provide a feature.
(custom-make-dependencies): Ignore dotfiles (dir-locals).
Don't mistakenly ignore files whose basenames match a basename
=== modified file 'lisp/cedet/ChangeLog'
--- a/lisp/cedet/ChangeLog 2013-05-14 02:10:23 +0000
+++ b/lisp/cedet/ChangeLog 2013-05-15 23:55:41 +0000
@@ -1,3 +1,9 @@
+2013-05-15 Glenn Morris <address@hidden>
+
+ * semantic/symref/list.el (semantic-symref-auto-expand-results)
+ (semantic-symref-results-mode-hook)
+ (semantic-symref-results-summary-function): Fix :group.
+
2013-05-14 Glenn Morris <address@hidden>
* ede/simple.el, semantic/java.el: Set generated-autoload-load-name.
=== modified file 'lisp/cedet/semantic/symref/list.el'
--- a/lisp/cedet/semantic/symref/list.el 2013-01-01 09:11:05 +0000
+++ b/lisp/cedet/semantic/symref/list.el 2013-05-15 23:55:41 +0000
@@ -178,12 +178,12 @@
(defcustom semantic-symref-auto-expand-results nil
"Non-nil to expand symref results on buffer creation."
- :group 'semantic-symref
+ :group 'semantic-symref-results-mode
:type 'boolean)
(defcustom semantic-symref-results-mode-hook nil
"Hook run when `semantic-symref-results-mode' starts."
- :group 'semantic-symref
+ :group 'semantic-symref-results-mode
:type 'hook)
(defvar semantic-symref-current-results nil
@@ -217,7 +217,7 @@
(defcustom semantic-symref-results-summary-function
'semantic-format-tag-prototype
"*Function to use when creating items in Imenu.
Some useful functions are found in `semantic-format-tag-functions'."
- :group 'semantic-symref
+ :group 'semantic-symref-results-mode
:type semantic-format-tag-custom-list)
(defun semantic-symref-results-dump (results)
=== modified file 'lisp/comint.el'
--- a/lisp/comint.el 2013-05-09 17:54:29 +0000
+++ b/lisp/comint.el 2013-05-15 23:55:41 +0000
@@ -148,10 +148,11 @@
"Completion facilities in comint."
:group 'comint)
-(defgroup comint-source nil
- "Source finding facilities in comint."
- :prefix "comint-"
- :group 'comint)
+;; Unused.
+;;; (defgroup comint-source nil
+;;; "Source finding facilities in comint."
+;;; :prefix "comint-"
+;;; :group 'comint)
(defvar comint-prompt-regexp "^"
"Regexp to recognize prompts in the inferior process.
=== modified file 'lisp/completion.el'
--- a/lisp/completion.el 2013-01-01 09:11:05 +0000
+++ b/lisp/completion.el 2013-05-15 23:55:41 +0000
@@ -2342,6 +2342,7 @@
and disable it otherwise. If called from Lisp, enable the mode
if ARG is omitted or nil."
:global t
+ :group 'completion
;; This is always good, not specific to dynamic-completion-mode.
(define-key function-key-map [C-return] [?\C-\r])
=== modified file 'lisp/cus-start.el'
--- a/lisp/cus-start.el 2013-05-09 01:40:20 +0000
+++ b/lisp/cus-start.el 2013-05-15 23:55:41 +0000
@@ -449,7 +449,8 @@
(other :tag "Always (t)" :value t))
"24.3")
;; xdisp.c
- (show-trailing-whitespace whitespace-faces boolean nil
+ ;; The whitespace group is for whitespace.el.
+ (show-trailing-whitespace editing-basics boolean nil
:safe booleanp)
(scroll-step windows integer)
(scroll-conservatively windows integer)
=== modified file 'lisp/emulation/tpu-edt.el'
--- a/lisp/emulation/tpu-edt.el 2013-05-12 10:22:44 +0000
+++ b/lisp/emulation/tpu-edt.el 2013-05-15 23:55:41 +0000
@@ -983,7 +983,7 @@
With a prefix argument ARG, enable the mode if ARG is positive,
and disable it otherwise. If called from Lisp, enable the mode
if ARG is omitted or nil."
- :global t
+ :global t :group 'tpu
(if tpu-edt-mode (tpu-edt-on) (tpu-edt-off)))
(defalias 'TPU-EDT-MODE 'tpu-edt-mode)
=== modified file 'lisp/erc/ChangeLog'
--- a/lisp/erc/ChangeLog 2013-05-09 01:40:20 +0000
+++ b/lisp/erc/ChangeLog 2013-05-15 23:55:41 +0000
@@ -1,3 +1,11 @@
+2013-05-15 Glenn Morris <address@hidden>
+
+ * erc-list.el (erc-list):
+ * erc-menu.el (erc-menu):
+ * erc-ring.el (erc-ring): Define custom groups, for define-erc-module.
+
+ * erc-list.el: Provide a feature.
+
2013-05-09 Glenn Morris <address@hidden>
* erc-desktop-notifications.el (erc-notifications-icon):
=== modified file 'lisp/erc/erc-list.el'
--- a/lisp/erc/erc-list.el 2013-01-01 09:11:05 +0000
+++ b/lisp/erc/erc-list.el 2013-05-15 23:55:41 +0000
@@ -30,6 +30,10 @@
(require 'erc)
+(defgroup erc-list nil
+ "Support for the /list command."
+ :group 'erc)
+
;; This is implicitly the width of the channel name column. Pick
;; something small enough that the topic has a chance of being
;; readable, but long enough that most channel names won't make for
@@ -214,6 +218,8 @@
""))))
(put 'erc-cmd-LIST 'do-not-parse-args t)
+(provide 'erc-list)
+
;;; erc-list.el ends here
;;
;; Local Variables:
=== modified file 'lisp/erc/erc-menu.el'
--- a/lisp/erc/erc-menu.el 2013-01-01 09:11:05 +0000
+++ b/lisp/erc/erc-menu.el 2013-05-15 23:55:41 +0000
@@ -30,6 +30,10 @@
(require 'erc)
(require 'easymenu)
+(defgroup erc-menu nil
+ "ERC menu support."
+ :group 'erc)
+
(defvar erc-menu-definition
(list "ERC"
["Connect to server..." erc t]
=== modified file 'lisp/erc/erc-ring.el'
--- a/lisp/erc/erc-ring.el 2013-01-01 09:11:05 +0000
+++ b/lisp/erc/erc-ring.el 2013-05-15 23:55:41 +0000
@@ -38,6 +38,10 @@
(require 'comint)
(require 'ring)
+(defgroup erc-ring nil
+ "An input ring for ERC."
+ :group 'erc)
+
;;;###autoload (autoload 'erc-ring-mode "erc-ring" nil t)
(define-erc-module ring nil
"Stores input in a ring so that previous commands and messages can
=== modified file 'lisp/eshell/esh-opt.el'
--- a/lisp/eshell/esh-opt.el 2013-01-01 09:11:05 +0000
+++ b/lisp/eshell/esh-opt.el 2013-05-15 23:55:41 +0000
@@ -27,11 +27,12 @@
(eval-when-compile (require 'esh-ext))
-(defgroup eshell-opt nil
- "The options processing code handles command argument parsing for
-Eshell commands implemented in Lisp."
- :tag "Command options processing"
- :group 'eshell)
+;; Unused.
+;;; (defgroup eshell-opt nil
+;;; "The options processing code handles command argument parsing for
+;;; Eshell commands implemented in Lisp."
+;;; :tag "Command options processing"
+;;; :group 'eshell)
;;; User Functions:
=== modified file 'lisp/faces.el'
--- a/lisp/faces.el 2013-05-11 02:27:28 +0000
+++ b/lisp/faces.el 2013-05-15 23:55:41 +0000
@@ -2292,7 +2292,6 @@
(t :inverse-video t))
"Basic face for highlighting trailing whitespace."
:version "21.1"
- :group 'whitespace-faces ; like `show-trailing-whitespace'
:group 'basic-faces)
(defface escape-glyph
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2013-05-11 02:25:11 +0000
+++ b/lisp/gnus/ChangeLog 2013-05-15 23:55:41 +0000
@@ -1,3 +1,8 @@
+2013-05-15 Glenn Morris <address@hidden>
+
+ * shr-color.el (shr-color-visible-luminance-min)
+ (shr-color-visible-distance-min): Use shr-color group.
+
2013-05-11 Glenn Morris <address@hidden>
* gnus-vm.el: Make it loadable without VM.
=== modified file 'lisp/gnus/shr-color.el'
--- a/lisp/gnus/shr-color.el 2013-05-09 01:40:20 +0000
+++ b/lisp/gnus/shr-color.el 2013-05-15 23:55:41 +0000
@@ -36,14 +36,14 @@
(defcustom shr-color-visible-luminance-min 40
"Minimum luminance distance between two colors to be considered visible.
Must be between 0 and 100."
- :group 'shr
+ :group 'shr-color
:type 'number)
(defcustom shr-color-visible-distance-min 5
"Minimum color distance between two colors to be considered visible.
This value is used to compare result for `ciede2000'. It's an
absolute value without any unit."
- :group 'shr
+ :group 'shr-color
:type 'integer)
(defconst shr-color-html-colors-alist
=== modified file 'lisp/international/ccl.el'
--- a/lisp/international/ccl.el 2013-01-01 09:11:05 +0000
+++ b/lisp/international/ccl.el 2013-05-15 23:55:41 +0000
@@ -43,10 +43,11 @@
;;; Code:
-(defgroup ccl nil
- "CCL (Code Conversion Language) compiler."
- :prefix "ccl-"
- :group 'i18n)
+;; Unused.
+;;; (defgroup ccl nil
+;;; "CCL (Code Conversion Language) compiler."
+;;; :prefix "ccl-"
+;;; :group 'i18n)
(defconst ccl-command-table
[if branch loop break repeat write-repeat write-read-repeat
=== modified file 'lisp/jit-lock.el'
--- a/lisp/jit-lock.el 2013-04-23 12:29:14 +0000
+++ b/lisp/jit-lock.el 2013-05-15 23:55:41 +0000
@@ -258,7 +258,7 @@
When this minor mode is enabled, jit-lock runs as little code as possible
during redisplay and moves the rest to a timer, where things
like `debug-on-error' and Edebug can be used."
- :global t
+ :global t :group 'jit-lock
(when jit-lock-defer-timer
(cancel-timer jit-lock-defer-timer)
(setq jit-lock-defer-timer nil))
=== modified file 'lisp/master.el'
--- a/lisp/master.el 2013-01-01 09:11:05 +0000
+++ b/lisp/master.el 2013-05-15 23:55:41 +0000
@@ -53,10 +53,11 @@
;;; Code:
-(defgroup master nil
- "Support for master/slave relationships between buffers."
- :version "22.1"
- :group 'convenience)
+;; Unused.
+;;; (defgroup master nil
+;;; "Support for master/slave relationships between buffers."
+;;; :version "22.1"
+;;; :group 'convenience)
;; Variables that don't need initialization.
@@ -84,7 +85,8 @@
The slave buffer is stored in the buffer-local variable `master-of'.
You can set this variable using `master-set-slave'. You can show
yourself the value of `master-of' by calling `master-show-slave'."
- :group 'master
+ ;; Not global, so no effect.
+;;; :group 'master
:keymap
'(("\C-c\C-n" . master-says-scroll-up)
("\C-c\C-p" . master-says-scroll-down)
=== modified file 'lisp/minibuffer.el'
--- a/lisp/minibuffer.el 2013-04-23 12:27:06 +0000
+++ b/lisp/minibuffer.el 2013-05-15 23:55:41 +0000
@@ -1856,6 +1856,7 @@
positive, and disable it otherwise. If called from Lisp, enable
the mode if ARG is omitted or nil."
:global t
+ :group 'minibuffer
(setq completion-in-region--data nil)
;; (remove-hook 'pre-command-hook #'completion-in-region--prech)
(remove-hook 'post-command-hook #'completion-in-region--postch)
=== modified file 'lisp/obsolete/old-whitespace.el'
--- a/lisp/obsolete/old-whitespace.el 2013-01-01 09:11:05 +0000
+++ b/lisp/obsolete/old-whitespace.el 2013-05-15 23:55:41 +0000
@@ -288,12 +288,6 @@
:type 'boolean
:group 'whitespace)
-(defgroup whitespace-faces nil
- "Faces used in whitespace."
- :prefix "whitespace-"
- :group 'whitespace
- :group 'faces)
-
(defface whitespace-highlight '((((class color) (background light))
(:background "green1"))
(((class color) (background dark))
@@ -305,7 +299,7 @@
(background dark))
(:background "white")))
"Face used for highlighting the bogus whitespaces that exist in the buffer."
- :group 'whitespace-faces)
+ :group 'whitespace)
(define-obsolete-face-alias 'whitespace-highlight-face
'whitespace-highlight "22.1")
=== modified file 'lisp/org/org-pcomplete.el'
--- a/lisp/org/org-pcomplete.el 2013-01-01 09:11:05 +0000
+++ b/lisp/org/org-pcomplete.el 2013-05-15 23:55:41 +0000
@@ -46,6 +46,7 @@
;;;; Customization variables
+;; Unused. Cf org-completion.
(defgroup org-complete nil
"Outline-based notes management and organizer."
:tag "Org"
=== modified file 'lisp/pcmpl-linux.el'
--- a/lisp/pcmpl-linux.el 2013-01-01 09:11:05 +0000
+++ b/lisp/pcmpl-linux.el 2013-05-15 23:55:41 +0000
@@ -31,9 +31,10 @@
(require 'pcomplete)
-(defgroup pcmpl-linux nil
- "Functions for dealing with GNU/Linux completions."
- :group 'pcomplete)
+;; Unused.
+;;; (defgroup pcmpl-linux nil
+;;; "Functions for dealing with GNU/Linux completions."
+;;; :group 'pcomplete)
;; Functions:
=== modified file 'lisp/progmodes/subword.el'
--- a/lisp/progmodes/subword.el 2013-03-30 01:32:12 +0000
+++ b/lisp/progmodes/subword.el 2013-05-15 23:55:41 +0000
@@ -148,6 +148,7 @@
;;;###autoload
(define-global-minor-mode global-subword-mode subword-mode
+ :group 'convenience
(lambda () (subword-mode 1)))
(defun subword-forward (&optional arg)
@@ -301,6 +302,7 @@
;;;###autoload
(define-global-minor-mode global-superword-mode superword-mode
+ :group 'convenience
(lambda () (superword-mode 1)))
=== modified file 'lisp/progmodes/vhdl-mode.el'
--- a/lisp/progmodes/vhdl-mode.el 2013-05-08 16:27:53 +0000
+++ b/lisp/progmodes/vhdl-mode.el 2013-05-15 23:55:41 +0000
@@ -8327,14 +8327,14 @@
With a prefix argument ARG, enable the mode if ARG is positive,
and disable it otherwise. If called from Lisp, enable it if ARG
is omitted or nil."
- :global t)
+ :global t :group 'vhdl-mode)
(define-minor-mode vhdl-stutter-mode
"Toggle VHDL stuttering mode.
With a prefix argument ARG, enable the mode if ARG is positive,
and disable it otherwise. If called from Lisp, enable it if ARG
is omitted or nil."
- :global t)
+ :global t :group 'vhdl-mode)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Stuttering
=== modified file 'lisp/shell.el'
--- a/lisp/shell.el 2013-01-02 16:13:04 +0000
+++ b/lisp/shell.el 2013-05-15 23:55:41 +0000
@@ -111,9 +111,10 @@
"Directory support in shell mode."
:group 'shell)
-(defgroup shell-faces nil
- "Faces in shell buffers."
- :group 'shell)
+;; Unused.
+;;; (defgroup shell-faces nil
+;;; "Faces in shell buffers."
+;;; :group 'shell)
;;;###autoload
(defcustom shell-dumb-shell-regexp (purecopy "cmd\\(proxy\\)?\\.exe")
=== modified file 'lisp/term/vt100.el'
--- a/lisp/term/vt100.el 2013-01-01 09:11:05 +0000
+++ b/lisp/term/vt100.el 2013-05-15 23:55:41 +0000
@@ -46,6 +46,7 @@
positive, and 80-column mode otherwise. If called from Lisp,
switch to 132-column mode if ARG is omitted or nil."
:global t :init-value (= (frame-width) 132)
+ :group 'terminals
(send-string-to-terminal (if vt100-wide-mode "\e[?3h" "\e[?3l"))
(set-frame-width terminal-frame (if vt100-wide-mode 132 80)))
=== modified file 'lisp/term/xterm.el'
--- a/lisp/term/xterm.el 2013-05-14 02:08:35 +0000
+++ b/lisp/term/xterm.el 2013-05-15 23:55:41 +0000
@@ -27,7 +27,7 @@
(defgroup xterm nil
"XTerm support."
:version "24.1"
- :group 'environment)
+ :group 'terminals)
(defcustom xterm-extra-capabilities 'check
"Whether Xterm supports some additional, more modern, features.
=== modified file 'lisp/textmodes/refill.el'
--- a/lisp/textmodes/refill.el 2013-01-01 09:11:05 +0000
+++ b/lisp/textmodes/refill.el 2013-05-15 23:55:41 +0000
@@ -83,9 +83,10 @@
;;; Code:
-(defgroup refill nil
- "Refilling paragraphs on changes."
- :group 'fill)
+;; Unused.
+;;; (defgroup refill nil
+;;; "Refilling paragraphs on changes."
+;;; :group 'fill)
(defvar refill-ignorable-overlay nil
"Portion of the most recently filled paragraph not needing filling.
@@ -222,7 +223,8 @@
auto-filling.
For true \"word wrap\" behavior, use `visual-line-mode' instead."
- :group 'refill
+ ;; Not global, so no effect.
+;;; :group 'refill
:lighter " Refill"
:keymap '(("\177" . backward-delete-char-untabify))
;; Remove old state if necessary
=== modified file 'lisp/textmodes/rst.el'
--- a/lisp/textmodes/rst.el 2013-01-01 09:11:05 +0000
+++ b/lisp/textmodes/rst.el 2013-05-15 23:55:41 +0000
@@ -3932,7 +3932,7 @@
(choice :tag "Command options"
(const :tag "No options" nil)
(string :tag "Options"))))
- :group 'rst
+ :group 'rst-compile
:package-version "1.2.0")
(rst-testcover-defcustom)
=== modified file 'lisp/type-break.el'
--- a/lisp/type-break.el 2013-05-09 01:40:20 +0000
+++ b/lisp/type-break.el 2013-05-15 23:55:41 +0000
@@ -418,7 +418,7 @@
`global-mode-string'
`type-break-mode-line-break-message'
`type-break-mode-line-warning'"
- :global t)
+ :global t :group 'type-break)
(define-minor-mode type-break-query-mode
"Toggle typing break queries.
@@ -428,7 +428,7 @@
The user may also enable or disable this mode simply by setting
the variable of the same name."
- :global t)
+ :global t :group 'type-break)
;;; session file functions
=== modified file 'lisp/url/ChangeLog'
--- a/lisp/url/ChangeLog 2013-03-11 16:31:55 +0000
+++ b/lisp/url/ChangeLog 2013-05-15 23:55:41 +0000
@@ -1,3 +1,7 @@
+2013-05-15 Glenn Morris <address@hidden>
+
+ * url-news.el (url-news): Remove empty custom group.
+
2013-02-16 Glenn Morris <address@hidden>
* url-http.el (url-http-wait-for-headers-change-function):
=== modified file 'lisp/url/url-news.el'
--- a/lisp/url/url-news.el 2013-01-01 09:11:05 +0000
+++ b/lisp/url/url-news.el 2013-05-15 23:55:41 +0000
@@ -28,9 +28,10 @@
(autoload 'url-warn "url")
(autoload 'gnus-group-read-ephemeral-group "gnus-group")
-(defgroup url-news nil
- "News related options."
- :group 'url)
+;; Unused.
+;;; (defgroup url-news nil
+;;; "News related options."
+;;; :group 'url)
(defun url-news-open-host (host port user pass)
(if (fboundp 'nnheader-init-server-buffer)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r112597: Misc custom group fixes,
Glenn Morris <=