Mercurial > emacs
comparison lisp/net/snmp-mode.el @ 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 | df55e63482c4 |
| children | 18a818a2ee7c 01137c1fdbe9 |
comparison
equal
deleted
inserted
replaced
| 62767:d5b706998a2b | 62768:a58b7c623705 |
|---|---|
| 391 (setq snmp-mode-access-list snmp-rfc1155-access) | 391 (setq snmp-mode-access-list snmp-rfc1155-access) |
| 392 (make-local-variable 'snmp-mode-status-list) | 392 (make-local-variable 'snmp-mode-status-list) |
| 393 (setq snmp-mode-status-list snmp-rfc1212-status) | 393 (setq snmp-mode-status-list snmp-rfc1212-status) |
| 394 | 394 |
| 395 ;; Run hooks | 395 ;; Run hooks |
| 396 (run-hooks 'snmp-common-mode-hook) | 396 (run-mode-hooks 'snmp-common-mode-hook 'snmp-mode-hook)) |
| 397 (run-hooks 'snmp-mode-hook)) | |
| 398 | 397 |
| 399 | 398 |
| 400 ;;;###autoload | 399 ;;;###autoload |
| 401 (defun snmpv2-mode () | 400 (defun snmpv2-mode () |
| 402 "Major mode for editing SNMPv2 MIBs. | 401 "Major mode for editing SNMPv2 MIBs. |
| 427 (setq snmp-mode-access-list snmp-rfc1902-access) | 426 (setq snmp-mode-access-list snmp-rfc1902-access) |
| 428 (make-local-variable 'snmp-mode-status-list) | 427 (make-local-variable 'snmp-mode-status-list) |
| 429 (setq snmp-mode-status-list snmp-rfc1902-status) | 428 (setq snmp-mode-status-list snmp-rfc1902-status) |
| 430 | 429 |
| 431 ;; Run hooks | 430 ;; Run hooks |
| 432 (run-hooks 'snmp-common-mode-hook) | 431 (run-mode-hooks 'snmp-common-mode-hook 'snmpv2-mode-hook)) |
| 433 (run-hooks 'snmpv2-mode-hook)) | |
| 434 | 432 |
| 435 | 433 |
| 436 ;;;---------------------------------------------------------------------------- | 434 ;;;---------------------------------------------------------------------------- |
| 437 ;; | 435 ;; |
| 438 ;; Indentation Setup | 436 ;; Indentation Setup |