From: Mark Wooding <mwooding@good.com>
Date: Mon, 16 Mar 2015 13:03:24 +0000 (+0000)
Subject: dot/emacs, el/dot-emacs.el: Don't alias `perl-mode' = `cperl-mode'.
X-Git-Url: https://git.distorted.org.uk/~mdw/profile/commitdiff_plain/7c061a6fc2ab16a53c7ee428d3f3b2e650e76355

dot/emacs, el/dot-emacs.el: Don't alias `perl-mode' = `cperl-mode'.

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.
---

diff --git a/dot/emacs b/dot/emacs
index 583cb96..e7ba086 100644
--- a/dot/emacs
+++ b/dot/emacs
@@ -530,7 +530,7 @@
 ;; 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)
@@ -572,7 +572,7 @@
       (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)
@@ -610,7 +610,6 @@
 	arm-assembler-mode-hook))
 
 (global-font-lock-mode t)
-(defalias 'perl-mode 'cperl-mode)
 
 ;;;--------------------------------------------------------------------------
 ;;; Rootly editingness.
diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index 7d7484e..8bb88c3 100644
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -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)