Mercurial > emacs
changeset 62768:a58b7c623705
* net/eudc.el (eudc-mode):
* net/quickurl.el (quickurl-list-mode):
* net/snmp-mode.el (snmp-mode, snmpv2-mode): Use run-mode-hooks.
| author | Lute Kamstra <lute@gnu.org> |
|---|---|
| date | Thu, 26 May 2005 15:23:59 +0000 |
| parents | d5b706998a2b |
| children | a1fa16a75bde |
| files | lisp/net/eudc.el lisp/net/quickurl.el lisp/net/snmp-mode.el |
| diffstat | 3 files changed, 4 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/net/eudc.el Thu May 26 15:22:06 2005 +0000 +++ b/lisp/net/eudc.el Thu May 26 15:23:59 2005 +0000 @@ -670,8 +670,7 @@ (if eudc-emacs-p (easy-menu-define eudc-emacs-menu eudc-mode-map "" (eudc-menu)) (setq mode-popup-menu (eudc-menu))) - (run-hooks 'eudc-mode-hook) - ) + (run-mode-hooks 'eudc-mode-hook)) ;;}}}
--- a/lisp/net/quickurl.el Thu May 26 15:22:06 2005 +0000 +++ b/lisp/net/quickurl.el Thu May 26 15:23:59 2005 +0000 @@ -458,7 +458,7 @@ (use-local-map quickurl-list-mode-map) (setq major-mode 'quickurl-list-mode mode-name "quickurl list") - (run-hooks 'quickurl-list-mode-hook) + (run-mode-hooks 'quickurl-list-mode-hook) (setq buffer-read-only t truncate-lines t))
--- a/lisp/net/snmp-mode.el Thu May 26 15:22:06 2005 +0000 +++ b/lisp/net/snmp-mode.el Thu May 26 15:23:59 2005 +0000 @@ -393,8 +393,7 @@ (setq snmp-mode-status-list snmp-rfc1212-status) ;; Run hooks - (run-hooks 'snmp-common-mode-hook) - (run-hooks 'snmp-mode-hook)) + (run-mode-hooks 'snmp-common-mode-hook 'snmp-mode-hook)) ;;;###autoload @@ -429,8 +428,7 @@ (setq snmp-mode-status-list snmp-rfc1902-status) ;; Run hooks - (run-hooks 'snmp-common-mode-hook) - (run-hooks 'snmpv2-mode-hook)) + (run-mode-hooks 'snmp-common-mode-hook 'snmpv2-mode-hook)) ;;;----------------------------------------------------------------------------