X-Git-Url: https://git.donarmstrong.com/?p=home-base.git;a=blobdiff_plain;f=.emacs;h=d1a9a5904aec2f468022b32b63db7a0456f960cf;hp=56b0244f9992e548fd75b83de5bdb102f0997180;hb=2bf349ab15f7a9f1318ed63ed44c3548f1cae9a1;hpb=78db66f0faf65b5f82aa7424beefef04360a0efd diff --git a/.emacs b/.emacs index 56b0244..d1a9a59 100644 --- a/.emacs +++ b/.emacs @@ -16,9 +16,9 @@ '(display-time-mode t) '(global-auto-revert-mode t) '(global-font-lock-mode t nil (font-lock)) - '(global-set-key "\M-g" 'goto-line) - '(iswitchb-prompt-newbuffer nil) + '(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"))) '(post-email-address "don@donarmstrong.com") @@ -124,19 +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)))) -) - - +;; (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." @@ -144,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) @@ -186,5 +214,14 @@ (desktop-load-default) (desktop-read) -; start up the iswitchb mode -(iswitchb-mode) \ No newline at end of file +'(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)