dot/emacs, el/dot-emacs.el: Don't alias `perl-mode' = `cperl-mode'.
authorMark Wooding <mwooding@good.com>
Mon, 16 Mar 2015 13:03:24 +0000 (13:03 +0000)
committerMark Wooding <mdw@distorted.org.uk>
Mon, 16 Mar 2015 15:21:12 +0000 (15:21 +0000)
This was a mistake and makes it hard to compare the two.  Instead, just
use `cperl-mode' by default and leave the other one as a backup plan.

dot/emacs
el/dot-emacs.el

index 583cb96..e7ba086 100644 (file)
--- a/dot/emacs
+++ b/dot/emacs
 ;; Recognising types of files.
 
 (setq auto-mode-alist
-      (append `(("\\.p[lm]$" . perl-mode)
+      (append `(("\\.p[lm]$" . cperl-mode)
                ("\\.m$" . objc-mode)
                ("\\.mxd$" . c-mode)
                ("\\.cs$" . csharp-mode)
       (append `(("runlisp" . lisp-mode)
                ("@BASH@" . sh-mode)
                ("@PYTHON@" . python-mode)
-               ("@PERL@" . perl-mode)
+               ("@PERL@" . cperl-mode)
                ("@TCLSH@" . tcl-mode)
                ("@WISH@" . tcl-mode)
                ("/tclsh" . tcl-mode)
        arm-assembler-mode-hook))
 
 (global-font-lock-mode t)
-(defalias 'perl-mode 'cperl-mode)
 
 ;;;--------------------------------------------------------------------------
 ;;; Rootly editingness.
index 7d7484e..8bb88c3 100644 (file)
@@ -1944,7 +1944,6 @@ doesn't match any of the regular expressions in
 
 ;; Perl indentation style.
 
-(fset 'perl-mode 'cperl-mode)
 (setq cperl-indent-level 2)
 (setq cperl-continued-statement-offset 2)
 (setq cperl-continued-brace-offset 0)