【发布时间】:2017-11-12 13:20:44
【问题描述】:
我目前正在尝试在 emacs 中启用 clojure-mode-extra-font-locking。目前在
~/.emacs.d/bootleg/clojure-mode-extra-font-locking/clojure-mode-extra-font-locking.el
.
我有以下代码:
(require 'clojure-mode)
(add-to-list 'load-path "~/.emacs.d/bootleg/clojure-mode-extra-font-locking/")
(require 'clojure-mode-extra-font-locking)
但是当我打开一个 .clj 文件时,我会在 minibuffer 中得到这个:
文件模式指定错误:(void-function enable)
我做错了什么?谢谢!
编辑: 这就是我得到的
M-x 错误切换调试
Debugger entered--Lisp error: (void-function enable)
enable()
run-hooks(change-major-mode-after-body-hook prog-mode-hook clojure-mode-hook)
apply(run-hooks (change-major-mode-after-body-hook prog-mode-hook clojure-mode-hook))
run-mode-hooks(clojure-mode-hook)
clojure-mode()
set-auto-mode-0(clojure-mode nil)
set-auto-mode()
normal-mode(t)
after-find-file(nil t)
find-file-noselect-1(#<buffer test.clj> "~/src/clojure/test.clj" nil nil "~/src/clojure/test.clj" (16260320 2069))
find-file-noselect("/home/n/src/clojure/test.clj" nil nil nil)
find-file("/home/n/src/clojure/test.clj")
#[257 "\304\305!!r\306\307\310\311\312\313!\314\"\315\316%DC\216\317@\320\"\210 \205$\321\n!?\205)\322\323\n\"!+\207" [ivy-last counsel-find-file-speedup-remote ivy--directory find-file-hook internal--before-with-selected-window ivy--get-window funcall make-byte-code 0 "\301\300!\207" vconcat vector [internal--after-with-selected-window] 2 "\n\n(fn)" select-window norecord file-remote-p find-file expand-file-name] 9 "\n\n(fn X)"]("/home/k/src/clojure/test.clj")
ivy-call()
ivy-read("Find file: " read-file-name-internal :matcher counsel--find-file-matcher :initial-input nil :action #[257 "\304\305!!r\306\307\310\311\312\313!\314\"\315\316%DC\216\317@\320\"\210 \205$\321\n!?\205)\322\323\n\"!+\207" [ivy-last counsel-find-file-speedup-remote ivy--directory find-file-hook internal--before-with-selected-window ivy--get-window funcall make-byte-code 0 "\301\300!\207" vconcat vector [internal--after-with-selected-window] 2 "\n\n(fn)" select-window norecord file-remote-p find-file expand-file-name] 9 "\n\n(fn X)"] :preselect nil :require-match confirm-after-completion :history file-name-history :keymap (keymap (C-backspace . counsel-up-directory) (67108991 . counsel-up-directory)) :caller counsel-find-file)
counsel-find-file()
call-interactively(counsel-find-file nil nil)
command-execute(counsel-find-file)
【问题讨论】:
-
我猜它在你的钩子函数之一中(
change-major-mode-after-body-hook、prog-mode-hook或clojure-mode-hook)。检查所有这些并确保挂钩中的每个功能都正常工作。