diff options
| author | Chong Yidong | 2009-08-13 15:59:34 +0000 |
|---|---|---|
| committer | Chong Yidong | 2009-08-13 15:59:34 +0000 |
| commit | 6c58c39c35755510b3ff1dc85f3625d28c732d2b (patch) | |
| tree | 7eadf52f0b35353c75998ca29668785b41fbb2b6 | |
| parent | 850d0752fb8ab02e3ffc80567578f9e9a4cb77f9 (diff) | |
| download | emacs-6c58c39c35755510b3ff1dc85f3625d28c732d2b.tar.gz emacs-6c58c39c35755510b3ff1dc85f3625d28c732d2b.zip | |
* faces.el (help-argument-name): Define it here instead of
help-fns.el, because in daemon mode help-fns.el may be loaded when
faces are still uninitialized (Bug#1078).
* help-fns.el (help-argument-name): Move defface to faces.el.
| -rw-r--r-- | lisp/ChangeLog | 8 | ||||
| -rw-r--r-- | lisp/faces.el | 3 | ||||
| -rw-r--r-- | lisp/help-fns.el | 4 |
3 files changed, 11 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0c53edc8a9d..ca7cc805b70 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,11 @@ | |||
| 1 | 2009-08-13 Chong Yidong <cyd@stupidchicken.com> | ||
| 2 | |||
| 3 | * faces.el (help-argument-name): Define it here instead of | ||
| 4 | help-fns.el, because in daemon mode help-fns.el may be loaded when | ||
| 5 | faces are still uninitialized (Bug#1078). | ||
| 6 | |||
| 7 | * help-fns.el (help-argument-name): Move defface to faces.el. | ||
| 8 | |||
| 1 | 2009-08-13 Nick Roberts <nickrob@snap.net.nz> | 9 | 2009-08-13 Nick Roberts <nickrob@snap.net.nz> |
| 2 | 10 | ||
| 3 | * progmodes/gdb-mi.el (gdb-inferior-io-mode): Use start-process to | 11 | * progmodes/gdb-mi.el (gdb-inferior-io-mode): Use start-process to |
diff --git a/lisp/faces.el b/lisp/faces.el index bc7513eab64..b8d21404e87 100644 --- a/lisp/faces.el +++ b/lisp/faces.el | |||
| @@ -2506,6 +2506,9 @@ Note: Other faces cannot inherit from the cursor face." | |||
| 2506 | :group 'menu | 2506 | :group 'menu |
| 2507 | :group 'basic-faces) | 2507 | :group 'basic-faces) |
| 2508 | 2508 | ||
| 2509 | (defface help-argument-name '((((supports :slant italic)) :inherit italic)) | ||
| 2510 | "Face to highlight argument names in *Help* buffers." | ||
| 2511 | :group 'help) | ||
| 2509 | 2512 | ||
| 2510 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 2513 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2511 | ;;; Manipulating font names. | 2514 | ;;; Manipulating font names. |
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 7747c505ec9..b9530d89be9 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el | |||
| @@ -158,10 +158,6 @@ KIND should be `var' for a variable or `subr' for a subroutine." | |||
| 158 | (concat "src/" file) | 158 | (concat "src/" file) |
| 159 | file))))) | 159 | file))))) |
| 160 | 160 | ||
| 161 | (defface help-argument-name '((((supports :slant italic)) :inherit italic)) | ||
| 162 | "Face to highlight argument names in *Help* buffers." | ||
| 163 | :group 'help) | ||
| 164 | |||
| 165 | (defun help-default-arg-highlight (arg) | 161 | (defun help-default-arg-highlight (arg) |
| 166 | "Default function to highlight arguments in *Help* buffers. | 162 | "Default function to highlight arguments in *Help* buffers. |
| 167 | It returns ARG in face `help-argument-name'; ARG is also | 163 | It returns ARG in face `help-argument-name'; ARG is also |