Delete commented out code from cperl-mode.el

* lisp/progmodes/cperl-mode.el: Delete some commented out code.
This commit is contained in:
Stefan Kangas 2023-09-17 23:37:32 +02:00
parent f3a50f6dd8
commit 6dfe252fff

View file

@ -333,17 +333,7 @@ Affects: `cperl-font-lock', `cperl-electric-lbrace-space',
(defcustom cperl-vc-rcs-header '("($rcs) = (' $Id\ $ ' =~ /(\\d+(\\.\\d+)+)/);")
"Special version of `vc-rcs-header' that is used in CPerl mode buffers."
:type '(repeat string)
:group 'cperl)
;; (defcustom cperl-clobber-mode-lists
;; (not
;; (and
;; (boundp 'interpreter-mode-alist)
;; (assoc "miniperl" interpreter-mode-alist)
;; (assoc "\\.\\([pP][Llm]\\|al\\)$" auto-mode-alist)))
;; "Whether to install us into `interpreter-' and `extension' mode lists."
;; :type 'boolean
;; :group 'cperl)
:group 'cperl)
(defcustom cperl-info-on-command-no-prompt nil
"Not-nil (and non-null) means not to prompt on \\[cperl-info-on-command].
@ -912,14 +902,6 @@ Unless KEEP, removes the old indentation."
(delete-horizontal-space))
(indent-to column minimum))
;; Probably it is too late to set these guys already, but it can help later:
;;(and cperl-clobber-mode-lists
;;(setq auto-mode-alist
;; (append '(("\\.\\([pP][Llm]\\|al\\)$" . perl-mode)) auto-mode-alist ))
;;(and (boundp 'interpreter-mode-alist)
;; (setq interpreter-mode-alist (append interpreter-mode-alist
;; '(("miniperl" . perl-mode))))))
(eval-when-compile
(mapc #'require '(imenu easymenu etags timer man info)))