From: Don Armstrong Date: Fri, 4 Jan 2013 00:28:36 +0000 (-0800) Subject: use setq-default instead of just setq in .emacs X-Git-Url: https://git.donarmstrong.com/?p=emacs.git;a=commitdiff_plain;h=9203c885f9860b41e81d84d3bd9caebdf343bb3a use setq-default instead of just setq in .emacs --- diff --git a/.emacs b/.emacs index 0c1310d..a847ed2 100644 --- a/.emacs +++ b/.emacs @@ -68,12 +68,12 @@ ;;(require 'fixme) (require 'google-weather) (require 'org-google-weather) -(setq org-google-weather-format "%i %c, [%l,%h] %s %C") +(setq-default org-google-weather-format "%i %c, [%l,%h] %s %C") (global-set-key "\C-xp" 'server-edit) -(setq auto-mode-alist (cons '("\.wml$" . +(setq-default auto-mode-alist (cons '("\.wml$" . (lambda () (html-mode) (auto-fill-mode))) auto-mode-alist)) @@ -107,7 +107,7 @@ ;; which really should be, ;; if (-!-) { ;; } -(setq cperl-hairy t +(setq-default cperl-hairy t cperl-indent-level 4 ;; cperl-auto-newline t ;; cperl-auto-newline-after-colon t @@ -123,14 +123,15 @@ ;(load-library "php-mode") -(setq c-indent-level 8) -(setq c-brace-imaginary-offset 0) -(setq c-brace-offset -8) -(setq c-argdecl-indent 8) -(setq c-label-offset -8) -(setq c-continued-statement-offset 8) -(setq indent-tabs-mode nil) -(setq tab-width 8) +(setq-default c-indent-level 8) +(setq-default c-brace-imaginary-offset 0) +(setq-default c-brace-offset -8) +(setq-default c-argdecl-indent 8) +(setq-default c-label-offset -8) +(setq-default c-continued-statement-offset 8) +; tabs are annoying +(setq-default indent-tabs-mode nil) +(setq-default tab-width 8) ;; (autoload 'php-mode "php-mode" "PHP editing mode" t) @@ -183,8 +184,8 @@ (add-to-list 'font-latex-match-function-keywords "aclu") (add-to-list 'font-latex-match-function-keywords "acused") (font-latex-match-function-make) -(setq TeX-parse-self t) -(setq TeX-auto-save t) +(setq-default TeX-parse-self t) +(setq-default TeX-auto-save t) (setq-default TeX-master nil) (defun insert-date () @@ -203,13 +204,13 @@ ;(iswitchb-default-keybindings) (column-number-mode t) -(setq reftex-plug-into-AUCTeX t) +(setq-default reftex-plug-into-AUCTeX t) (server-start) (require 'mode-compile) -(setq reftex-default-bibliography +(setq-default reftex-default-bibliography '("references.bib")) (defadvice server-process-filter (after post-mode-message first activate) @@ -221,7 +222,7 @@ ; This is also needed to see the magic message. Set to a higher ; number if you have a faster computer or read slower than me. '(font-lock-verbose 1000) -;(setq server-temp-file-regexp "mutt\(-\|ng-\)") +;(setq-default server-temp-file-regexp "mutt\(-\|ng-\)") ; (add-hook 'server-switch-hook ; (function (lambda() ; (cond ((string-match "Post" mode-name) @@ -274,8 +275,8 @@ (global-set-key "\C-cl" 'org-store-link) (global-set-key "\C-ca" 'org-agenda) (global-set-key "\C-cb" 'org-iswitchb) -(setq org-log-done 'time) -(setq org-agenda-ndays 5) +(setq-default org-log-done 'time) +(setq-default org-agenda-ndays 5) (autoload 'flyspell-mode "flyspell" "On-the-fly spelling checker." t) @@ -336,10 +337,10 @@ ) (add-hook 'org-mode-hook 'my-org-mode-setup) -(setq org-mobile-directory "/rzlab.ucr.edu:/sites/dav.donarmstrong.com/root/org/") -(setq org-directory "/home/don/org-mode/") -(setq org-mobile-inbox-for-pull "/home/don/org-mode/from-mobile.org") +(setq-default org-mobile-directory "/rzlab.ucr.edu:/sites/dav.donarmstrong.com/root/org/") +(setq-default org-directory "/home/don/org-mode/") +(setq-default org-mobile-inbox-for-pull "/home/don/org-mode/from-mobile.org") ; debian stuff -(setq debian-changelog-mailing-address "don@debian.org") -(setq debian-changelog-full-name "Don Armstrong") +(setq-default debian-changelog-mailing-address "don@debian.org") +(setq-default debian-changelog-full-name "Don Armstrong")