emacs乳胶挂钩未运行

因此，出于某种原因，我在emacs中使用auctex的latex模式的一些钩子拒绝运行，但没有给出任何错误（至少我在消息缓冲区中看不到任何错误）。这是my.emacs中关于latex的大部分内容（除了一些关键字定义等）。我在Arch Linux上运行Emacs24.2，同时还使用最新版本的auctex。我已经为此绞尽脑汁了一段时间，据我记忆所及，这项功能过去一直运行良好，直到今天我才注意到flyspell和auto fill并没有自动设置（可能已经有一段时间了，因为我有一段时间没有使用auctex了）

（添加到列表“加载路径”~/Dropbox/Emacs/”）
（添加到列表“加载路径”~/Dropbox/Emacs/git/”）
（添加到列表“加载路径”~/Dropbox/Emacs/magit/”）
（添加到列表“加载路径”~/Dropbox/Emacs/GLSL/”）

；；自动完成
（需要“自动完成”）
（需要“自动完成配置”）
（需要“自动完成叮当声”）
（ac flyspell解决方案）
（添加到列表“交流模式”乳胶模式）
（ac配置默认值）
（setq ac快速帮助延迟0）
（定义按键交流模式映射[（控制选项卡）]“自动完成”）
（setq默认交流电源
'（交流电源缩写为ac电源字典
相同模式下的交流源字
（全局自动完成模式t）
（添加钩子'emacs lisp模式钩子
（lambda（）
（添加到列表“交流电源”交流电源符号“交流电源变量”））
（defun add-sources-c-modes（）
（添加到列表“交流电源”交流电源语义“交流电源铃声”）
（添加钩子“c模式钩子”添加源-c模式）
（添加钩子'c++-mode钩子'add-sources-c-modes）
（定义ac键完成映射“\C-n”ac下一步）
（定义ac键完成映射“\C-p”'ac上一个）

；；DocView
（setq文件视图连续t）
（setq文件视图分辨率300）

；；差模颜色
（负载后评估‘差异模式
"(progn)
（设置面前景的差异添加为“绿色”）
（将“面前景”差异标题设置为“紫色”）
（将面部前景的“差异”设置为“红色”））

；；脏颜色
（装载后评估“直接”模式
"(progn)
（设置面前景的直接目录“青色”）
（将面部前景设置为“红色”）
（设置正面前景的直接标题为“紫色”））

；；服务器模式
;; （服务器启动）

；；GLSL
（自动加载“glsl模式”glsl模式“无”
（添加到列表“自动模式列表”（“\.vert\”.glsl模式））
（添加到列表“自动模式列表”（“\.frag\”.glsl mode））

；；Git/SVN
（需要“吉特”）
（要求“git责备”）

；；Emacs代码浏览器/CEDET
;; （需要“cedet”）
;; （欧洲央行）
;; （setq ecb选项版本“2.40”）

；；启动时关闭暂存缓冲区
（卸下关闭刮痕钩（）
（杀死缓冲区“划痕”））
（添加挂钩“emacs启动挂钩”关闭刮痕挂钩）

；；LaTeX/Auctex设置
（需要交流数学）
（取消空调乳胶模式设置（）
（添加到列表“交流电源”交流电源数学unicode“交流电源数学”
‘交流电源（命令））
（添加挂钩“乳胶模式挂钩”乳胶数学模式）
（添加挂钩“乳胶模式挂钩”打开reftex）
（添加钩子“文本模式钩子”自动填充模式）
（添加钩子“乳胶模式钩子”启用flyspell）
（添加挂钩“乳胶模式挂钩”ac乳胶模式设置）
（添加挂钩“乳胶模式挂钩”
（lambda（）
（将人脸前景设置为“青色”字体）
（setq reftex插头插入AUCTeX t）
（setq字体匹配幻灯片标题关键字（引号（（“frametitle”“{”））
（setq字体匹配警告关键字（引号（“hline”“pause”“and”“hfill”））
（setq字体匹配函数关键字）
（引述
（（“标题页”（“maketitle”）（“框架”（“目录”）
（“noindent”）（“usetheme”{”）（“usecolortheme”{”）（“institute”[{”）
（“includegraphics”“[{”）（“title”“[{”）（“href”“{{”）（“url”“{”）（“hypersetup”“{”）
（“useoutertheme”“{”）（“useinnertheme”“{”）（“setbeamercolor”“{”）
（“setbeamertemplate”“{{”）（“setdescription”“{”）（“lstset”“{”）（“lstinputlisting”“[{”）
（“textcolor”“{”）（“verbatiminput”“{”）（“graphicspath”“{”）
（“fancyhead”“[{”）（“fancyfoot”“[{”）（“fontsize”“{{”）（“doublespacing”“）））

行号
（需要“林姆”）
（全局linum模式t）

；禁用某些缓冲区中的行号
（自定义linum禁用模式列表（eshell模式wl摘要模式编译模式组织模式dired模式）
“*启用全局linum模式时禁用的模式列表”
：type'（重复（sexp:tag“Major mode”））
：标记“禁用linum的主要模式：”
：组“linum）

（自定义linum禁用星型缓冲区't
“*禁用带有星星的缓冲区，如Gnu Emacs”
：type“boolean
：组“linum）

（在（）
*当linum在全局运行时，在“linum禁用模式列表”中定义的模式中禁用行号。由linum更改为“关闭”。还可以在星号模式（如“刮擦”）中关闭编号
（除非（或（小型缓冲区）（成员主要模式linum禁用模式列表）
（和linum禁用星型缓冲区（字符串匹配“*”（缓冲区名称）））
（linum模式1）

；基本emacs设置
（setq初始划痕缓冲区为零）
（setq禁止启动屏幕t）
（setq禁止启动消息t）
（setq默认截断行t）
（setq备份被禁止）
（setq自动保存默认值为零）
（setq编译滚动输出t）
（如果（边界滚动条模式）（滚动条模式-1））
（列编号模式1）
（setq默认填充列80）
（setq自动填充模式1）
（如果（边界工具栏模式）（工具栏模式0））
（设置面属性“默认为零：高度100”）
（添加钩子“保存钩子之前”删除尾部空白）
（全局自动恢复模式t）
（setq帧标题格式“%b”）

；cscope
（需要“xScope”）
（setq cscope不更新数据库t）

；启用这些选项以加速编译器输出
；；（setq编译错误regexp alist nil）
；；（setq编译错误regexp-nil）

缩进规则
（setq c-default-style“bsd”c-basic-offset 4）
（c-设置偏移量“箱子标签”+）
（setq sgml基本偏移量4）
（setq python缩进4）
（setq缩进制表符模式nil）
（setq制表符始终缩进t）
（设置标签宽度4

(add-to-list 'load-path "~/Dropbox/Emacs/")
(add-to-list 'load-path "~/Dropbox/Emacs/git/")
(add-to-list 'load-path "~/Dropbox/Emacs/magit/")
(add-to-list 'load-path "~/Dropbox/Emacs/GLSL/")


;; auto-complete
(require 'auto-complete)
(require 'auto-complete-config)
(require 'auto-complete-clang)
(ac-flyspell-workaround)
(add-to-list 'ac-modes 'LaTeX-mode)
(ac-config-default)
(setq ac-quick-help-delay 0)
(define-key ac-mode-map  [(control tab)] 'auto-complete)
(setq-default ac-sources
          '(ac-source-abbrev ac-source-dictionary
                 ac-source-words-in-same-mode-buffers))
(global-auto-complete-mode t)
(add-hook 'emacs-lisp-mode-hook
      (lambda  ()
        (add-to-list 'ac-sources 'ac-source-symbols 'ac-source-variables)))
(defun add-sources-c-modes ()
  (add-to-list 'ac-sources 'ac-source-semantic 'ac-source-clang))
(add-hook 'c-mode-hook 'add-sources-c-modes)
(add-hook 'c++-mode-hook 'add-sources-c-modes)
(define-key ac-completing-map "\C-n" 'ac-next)
(define-key ac-completing-map "\C-p" 'ac-previous)


;; DocView
(setq doc-view-continuous t)
(setq doc-view-resolution 300)


;; diff mode colors
(eval-after-load 'diff-mode
  '(progn
     (set-face-foreground 'diff-added "green")
     (set-face-foreground 'diff-header "purple")
     (set-face-foreground 'diff-removed "red")))


;; dired colors
(eval-after-load 'dired-mode
  '(progn
     (set-face-foreground 'dired-directory "cyan")
     (set-face-foreground 'dired-flagged "red")
     (set-face-foreground 'dired-header "purple")))


;; server mode
;; (server-start)


;; GLSL
(autoload 'glsl-mode "glsl-mode" nil t)
(add-to-list 'auto-mode-alist '("\.vert\'" . glsl-mode))
(add-to-list 'auto-mode-alist '("\.frag\'" . glsl-mode))


;; Git / SVN
(require 'git)
(require 'git-blame)


;; Emacs Code Browser / CEDET
;; (require 'cedet)
;; (require 'ecb)
;; (setq ecb-options-version "2.40")


;; Close scratch buffer on startup
(defun close-scratch-hook ()
  (kill-buffer "scratch"))
(add-hook 'emacs-startup-hook 'close-scratch-hook)


;; LaTeX/Auctex settings
(require 'ac-math)
(defun ac-latex-mode-setup ()
  (add-to-list 'ac-sources 'ac-source-math-unicode 'ac-source-math-latex
           'ac-source-latex-commands))
(add-hook 'LaTeX-mode-hook 'latex-math-mode)
(add-hook 'LaTeX-mode-hook 'turn-on-reftex)
(add-hook 'text-mode-hook 'auto-fill-mode)
(add-hook 'LaTeX-mode-hook 'turn-on-flyspell)
(add-hook 'LaTeX-mode-hook 'ac-latex-mode-setup)
(add-hook 'LaTeX-mode-hook
      (lambda ()
         (set-face-foreground 'font-latex-sedate-face "cyan")))
(setq reftex-plug-into-AUCTeX t)
(setq font-latex-match-slide-title-keywords (quote (("frametitle" "{"))))
(setq font-latex-match-warning-keywords (quote ("hline" "pause" "and" "hfill")))
(setq font-latex-match-function-keywords
      (quote
       (("titlepage" "") ("maketitle" "") ("frame" "") ("tableofcontents" "")
    ("noindent" "") ("usetheme" "{") ("usecolortheme" "{") ("institute" "[{")
    ("includegraphics" "[{") ("title" "[{") ("href" "{{") ("url" "{") ("hypersetup" "{")
    ("useoutertheme" "{") ("useinnertheme" "{") ("setbeamercolor" "{{")
    ("setbeamertemplate" "{{") ("setdescription" "{") ("lstset" "{") ("lstinputlisting" "[{")
    ("textcolor" "{") ("verbatiminput" "{") ("graphicspath" "{")
    ("fancyhead" "[{") ("fancyfoot" "[{") ("fontsize" "{{") ("doublespacing" ""))))


;; Line numbers
(require 'linum)
(global-linum-mode t)


;; Disable line numbers in certain buffers
(defcustom linum-disabled-modes-list '(eshell-mode wl-summary-mode compilation-mode org-mode dired-mode)
  "* List of modes disabled when global linum mode is on"
  :type '(repeat (sexp :tag "Major mode"))
  :tag " Major modes where linum is disabled: "
  :group 'linum)


(defcustom linum-disable-starred-buffers 't
  "* Disable buffers that have stars in them like Gnu Emacs"
  :type 'boolean
  :group 'linum)


(defun linum-on ()
  "* When linum is running globally, disable line number in modes defined in `linum-disabled-modes-list'. Changed by linum-off. Also turns off numbering in starred modes like scratch"
  (unless (or (minibufferp) (member major-mode linum-disabled-modes-list)
          (and linum-disable-starred-buffers (string-match "*" (buffer-name))))
    (linum-mode 1)))


;; Basic emacs settings
(setq initial-scratch-buffer nil)
(setq inhibit-splash-screen t)
(setq inhibit-startup-message t)
(setq-default truncate-lines t)
(setq backup-inhibited t)
(setq auto-save-default nil)
(setq compilation-scroll-output t)
(if (boundp 'scroll-bar-mode) (scroll-bar-mode -1))
(column-number-mode 1)
(setq-default fill-column 80)
(setq auto-fill-mode 1)
(if (boundp 'tool-bar-mode) (tool-bar-mode 0))
(set-face-attribute 'default nil :height 100)
(add-hook 'before-save-hook 'delete-trailing-whitespace)
(global-auto-revert-mode t)
(setq frame-title-format "%b")


;; cscope
(require 'xcscope)
(setq cscope-do-not-update-database t)


;; Enable these to speed up compiler output
;; (setq compilation-error-regexp-alist nil)
;; (setq compilation-error-regexp-alist-alist nil)


;; Indentation rules
(setq c-default-style "bsd" c-basic-offset 4)
(c-set-offset 'case-label '+)
(setq sgml-basic-offset 4)
(setq python-indent 4)
(setq indent-tabs-mode nil)
(setq tab-always-indent t)
(setq tab-width 4)
(setq tab-stop-list (quote (4 8 12 16 20 24 28 32 36 40 44 48 52
                  56 60 64 68 72 76 80 84 88 92 96
                  100 104 108 112 116 120)))


;; highlight matching parentheses
(show-paren-mode 1)
(setq show-paren-delay 0)


;; highlight current line
(global-hl-line-mode 1)
(set-face-background 'hl-line "#300")


;; C-Sharp mode
;; (require 'cc-mode)
;; (autoload 'csharp-mode "csharp-mode" "Major mode for editing C# code." t)
;; (add-to-list 'auto-mode-alist '("\.cs$" . csharp-mode))


;; Change the color scheme
(require 'color-theme)
(color-theme-initialize)
(color-theme-midnight)


;; Make ENTER automatically indent in C derived buffers
(add-hook 'c-mode-common-hook
      (lambda ()
         (local-set-key (kbd "RET") 'newline-and-indent)))


;; Enable terminal colors
(autoload 'ansi-color-for-comint-mode-on "ansi-color" nil t)
(add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on)


;; Hotkeys
(global-set-key [f9] 'compile)


;; Emacs IRC
(setq erc-auto-query 'buffer)


;; assembly mode
(add-hook 'asm-mode-hook
      (lambda ()
         (local-set-key (kbd "RET") 'newline)))


;; change default Browser
(setq browse-url-generic-program (executable-find "chromium")
      browse-url-browser-function 'browse-url-generic)


;; multi-term
(require 'multi-term)


;; yasnippet work around
;; (add-hook 'change-major-mode-hook 'yas/exit-all-snippets)


;; develock
(require 'develock)
(defun ac-latex-mode-setup ()         ; add ac-sources to default ac-sources
  (setq ac-sources
     (append '(ac-source-math-unicode ac-source-math-latex ac-source-latex-commands)
               ac-sources))
)

(eval-after-load 'LaTeX-mode
  '(set-face-foreground 'font-latex-sedate-face "cyan"))