X-Git-Url: https://git.donarmstrong.com/?p=home-base.git;a=blobdiff_plain;f=.emacs;h=d1a9a5904aec2f468022b32b63db7a0456f960cf;hp=636088c75f089d85ac9480a27f15fa54df64ff63;hb=2bf349ab15f7a9f1318ed63ed44c3548f1cae9a1;hpb=c9712b0ae9357fb7dd3f861dda404dcf57fd8b27 diff --git a/.emacs b/.emacs index 636088c..d1a9a59 100644 --- a/.emacs +++ b/.emacs @@ -16,6 +16,8 @@ '(display-time-mode t) '(global-auto-revert-mode t) '(global-font-lock-mode t nil (font-lock)) + '(global-set-key "\347" t) + '(iswitchb-mode t) '(iswitchb-prompt-newbuffer nil) '(mail-user-agent (quote sendmail-user-agent)) '(mutt-alias-file-list (quote ("~/.mutt/aliases" "~/.mail_aliases"))) @@ -48,7 +50,7 @@ ;;(require 'emacs-wiki) (require 'bibtex) (require 'post) - +;;(require 'fixme) (global-set-key "\C-xp" 'gnuserv-edit) @@ -66,7 +68,8 @@ (add-to-list 'auto-mode-alist '("muttng-[a-z0-9]+-[0-9]+-" . post-mode)) (add-to-list 'auto-mode-alist '("muttngrc" . muttrc-mode)) - +(global-unset-key "\M-g") +(global-set-key "\M-g" 'goto-line) ;;(autoload 'perl-mode "cperl-mode" ;; "alternate mode for editing Perl programs" t) @@ -92,7 +95,7 @@ -(load-library "php-mode") +;(load-library "php-mode") (setq c-indent-level 8) (setq c-brace-imaginary-offset 0) @@ -121,8 +124,40 @@ (add-hook 'LaTeX-mode-hook 'outline-minor-mode) ; with AUCTeX LaTeX mode (add-hook 'latex-mode-hook 'outline-minor-mode) ; with Emacs latex mode - - +;; (TeX-add-style-hook +;; "latex" +;; (lambda () +;; (TeX-add-symbols +;; '("DLA" 1)))) +;; (custom-set-variables +;; '(font-latex-user-keyword-classes +;; '(("fixme" +;; ("DLA" "RZ") +;; font-lock-function-name-face 2 (command 1 t)))) +;; ) + +(require 'font-latex) +(add-to-list 'font-latex-match-reference-keywords "fref") +(add-to-list 'font-latex-match-reference-keywords "Fref") +(add-to-list 'font-latex-match-reference-keywords "citep") +(add-to-list 'font-latex-match-reference-keywords "citet") +(font-latex-match-reference-make) +(add-to-list 'font-latex-match-function-keywords "DLA") +(add-to-list 'font-latex-match-function-keywords "RZ") +(add-to-list 'font-latex-match-function-keywords "fixme") +(add-to-list 'font-latex-match-function-keywords "acs") +(add-to-list 'font-latex-match-function-keywords "acsp") +(add-to-list 'font-latex-match-function-keywords "ac") +(add-to-list 'font-latex-match-function-keywords "acp") +(add-to-list 'font-latex-match-function-keywords "acl") +(add-to-list 'font-latex-match-function-keywords "aclp") +(add-to-list 'font-latex-match-function-keywords "acsu") +(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-master nil) (defun insert-date () "Insert date at point." @@ -130,6 +165,13 @@ (insert (format-time-string "%A, %B %e, %Y %k:%M:%S %Z"))) (global-set-key "\C-[d" 'insert-date) +(defun unfill-paragraph (arg) + "Pull this whole paragraph up onto one line." + (interactive "*p") + (let ((fill-column 10000)) + (fill-paragraph arg)) + ) + ;(iswitchb-default-keybindings) (column-number-mode t) @@ -172,3 +214,14 @@ (desktop-load-default) (desktop-read) +'(iswitchb-mode on) +(custom-set-faces + ;; custom-set-faces was added by Custom. + ;; If you edit it by hand, you could mess it up, so be careful. + ;; Your init file should contain only one such instance. + ;; If there is more than one, they won't work right. + ) + +(put 'upcase-region 'disabled nil) + +(put 'downcase-region 'disabled nil)