comparison lisp/mh-e/mh-customize.el @ 67319:c9307100bfd0

* mh-customize.el (mh-insert-signature-hook): Rename mh-letter-insert-signature-hook to mh-insert-signature-hook. * mh-comp.el (mh-insert-signature): Ditto.
author Bill Wohler <wohler@newt.com>
date Mon, 05 Dec 2005 02:26:03 +0000
parents 436927904f36
children 315e71e95246
comparison
equal deleted inserted replaced
67318:2bd2f72e4a01 67319:c9307100bfd0
2320 "Invoked by \\<mh-folder-mode-map>`\\[mh-inc-folder]' after incorporating mail into a folder." 2320 "Invoked by \\<mh-folder-mode-map>`\\[mh-inc-folder]' after incorporating mail into a folder."
2321 :type 'hook 2321 :type 'hook
2322 :group 'mh-hooks 2322 :group 'mh-hooks
2323 :group 'mh-inc) 2323 :group 'mh-inc)
2324 2324
2325 (defcustom mh-insert-signature-hook nil
2326 "Invoked after signature has been inserted.
2327
2328 These functions may access the actual name of the file or the function used to
2329 insert the signature with `mh-signature-file-name'."
2330 :type 'hook
2331 :group 'mh-hooks
2332 :group 'mh-letter)
2333
2325 (defcustom mh-kill-folder-suppress-prompt-hook '(mh-index-p) 2334 (defcustom mh-kill-folder-suppress-prompt-hook '(mh-index-p)
2326 "Invoked at the beginning of the \\<mh-folder-mode-map>`\\[mh-kill-folder]' command. 2335 "Invoked at the beginning of the \\<mh-folder-mode-map>`\\[mh-kill-folder]' command.
2327 This hook is a list of functions to be called, with no arguments, which should 2336 This hook is a list of functions to be called, with no arguments, which should
2328 return a value of non-nil if you should not be asked if you're sure that you 2337 return a value of non-nil if you should not be asked if you're sure that you
2329 want to remove the folder. This is useful for folders that are easily 2338 want to remove the folder. This is useful for folders that are easily
2336 t on +inbox and you hit \\<mh-folder-mode-map>`\\[mh-kill-folder]' by accident 2345 t on +inbox and you hit \\<mh-folder-mode-map>`\\[mh-kill-folder]' by accident
2337 in the +inbox buffer, you will not be happy." 2346 in the +inbox buffer, you will not be happy."
2338 :type 'hook 2347 :type 'hook
2339 :group 'mh-hooks 2348 :group 'mh-hooks
2340 :group 'mh-folder) 2349 :group 'mh-folder)
2341
2342 (defcustom mh-letter-insert-signature-hook nil
2343 "Invoked after signature has been inserted.
2344 This hook may access the actual name of the file or the function used to
2345 insert the signature with `mh-signature-file-name'."
2346 :type 'hook
2347 :group 'mh-hooks
2348 :group 'mh-letter)
2349 2350
2350 (defcustom mh-letter-mode-hook nil 2351 (defcustom mh-letter-mode-hook nil
2351 "Invoked by `mh-letter-mode' on a new letter." 2352 "Invoked by `mh-letter-mode' on a new letter."
2352 :type 'hook 2353 :type 'hook
2353 :group 'mh-hooks 2354 :group 'mh-hooks