summaryrefslogtreecommitdiff
path: root/lisp/progmodes/cperl-mode.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2011-06-25 20:08:41 +0200
committerJuanma Barranquero <lekktu@gmail.com>2011-06-25 20:08:41 +0200
commit74f53697495eeb2caaa73d100d19591c0ee7bfaf (patch)
treee9efa4081f5ae85fa64216c056dcc9a3cbeaaaa5 /lisp/progmodes/cperl-mode.el
parent18a4ce5ea1b06bd077e87fd1ac8966b19b10ee8c (diff)
downloademacs-74f53697495eeb2caaa73d100d19591c0ee7bfaf.tar.gz
Simplify unloading functions after 2011-06-25T17:42:18Z!lekktu@gmail.com.
* allout.el (allout-unload-function): Pass -1 to `allout-mode'. * proced.el (proced-unload-function): * progmodes/cperl-mode.el (cperl-mode-unload-function): Remove. * ses.el (ses-unload-function): * emacs-lisp/re-builder.el (re-builder-unload-function): Simplify.
Diffstat (limited to 'lisp/progmodes/cperl-mode.el')
-rw-r--r--lisp/progmodes/cperl-mode.el12
1 files changed, 0 insertions, 12 deletions
diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el
index 2cce5e13fb0..8eb2d01c097 100644
--- a/lisp/progmodes/cperl-mode.el
+++ b/lisp/progmodes/cperl-mode.el
@@ -8971,18 +8971,6 @@ do extra unwind via `cperl-unwind-to-safe'."
(substring v (match-beginning 1) (match-end 1)))
"Version of IZ-supported CPerl package this file is based on.")
-(defun cperl-mode-unload-function ()
- "Unload the Cperl mode library."
- (let ((new-mode (if (eq (symbol-function 'perl-mode) 'cperl-mode)
- 'fundamental-mode
- 'perl-mode)))
- (dolist (buf (buffer-list))
- (with-current-buffer buf
- (when (eq major-mode 'cperl-mode)
- (funcall new-mode)))))
- ;; continue standard unloading
- nil)
-
(provide 'cperl-mode)
;;; cperl-mode.el ends here