found

[ian-dotfiles.git] / home / emacs / ian.el

diff --git a/home/emacs/ian.el b/home/emacs/ian.el
index 2b4616b3a75cce4a172358c8fff9fc04de7d0194..c963fbb5172ba70385152d1d8bfb7e86b8fead43 100644 (file)
--- a/home/emacs/ian.el
+++ b/home/emacs/ian.el
@@ -2,9 +2,9 @@
 ; 
 
 (defalias 'perl-mode 'cperl-mode)
-(setq cperl-invalid-face nil
-      cperl-indent-level 4
-      cperl-continued-statement-offset 4)
+(setq cperl-invalid-face nil)
+;      cperl-indent-level 4
+;      cperl-continued-statement-offset 4)
 
 (load-library "vm-reply")
 
@@ -13,7 +13,9 @@
 (put 'narrow-to-region 'disabled nil)
 (put 'eval-expression 'disabled nil)
 ;(standard-display-european t)
-;
+
+(setq visible-cursor nil)
+
 (setq browse-url-netscape-program "mozilla")
 (setq common-lisp-hyperspec-root "/usr/share/doc/hyperspec/")
 ;
@@ -34,7 +36,7 @@
 ; (if (string= (getenv "TERM") "bbcb32") (setq term-file-prefix nil))
 ; (setq explicit-shell-file-name "/usr/local/bin/tcsh")
 (setq inhibit-local-variables t)
-(setq enable-local-variables 'ask-me)
+(setq enable-local-variables :safe)
 (setq enable-recursive-minibuffers t)
 (setq compile-command "make")
 (setq next-line-add-newlines t)
@@ -49,6 +51,10 @@
    (eq indent-line-function 'insert-tab)
    (electric-indent-local-mode 0)))
 (add-hook 'after-change-major-mode-hook 'defuse-electrocuting-indent)
+
+(eval-after-load "sh-script"
+  '(add-hook 'sh-mode-hook (lambda () (sh-electric-here-document-mode 0))
+            t))
 ;
 (set-variable 'search-repeat-char 28)
 (set-fringe-mode (cons 0 nil))