# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1341599635 -10800
# Node ID 8c6ff01debc147995cfc3e729964c79104f25e81
# Parent  36d1d304e194eb42e8f45713188a05f891b2bbaa
Use cperl instead perl mode.

diff -r 36d1d304e194 -r 8c6ff01debc1 .emacs-my
--- a/.emacs-my	Wed Jul 04 20:56:55 2012 +0300
+++ b/.emacs-my	Fri Jul 06 21:33:55 2012 +0300
@@ -2020,6 +2020,16 @@
   )
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "perl, cperl")
+
+;; Use cperl instead perl mode.
+(mapc
+ (lambda (pair)
+   (if (eq (cdr pair) 'perl-mode)
+       (setcdr pair 'cperl-mode)))
+ (append auto-mode-alist interpreter-mode-alist))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "SML, Standard ML")
 
 (eval-after-load 'sml