0

我有一些我的教授为他给我们的 VM Linux 机器创建的 .el 文件。我刚刚在一台较旧的笔记本电脑上安装了 Linux,并在上面安装了 XEmacs。但是我在使用 .el 文件时遇到了 XEmacs 的问题。它不会添加任何突出显示,标签宽度为 4 或任何东西。

我将所有 .el 文件放在 .xemacs/ 目录中。

有谁知道我做错了什么?

我还将包含 .el 文件中的代码,以便大家都能看到。

就我的操作系统而言,我正在运行 64 位 Fedora 18。Spherical Cow。呜呜呜呜呜呜呜!!!

感谢大家的帮助!

init.el 文件:

;; Turn on line and column numbers
(line-number-mode 1)
(column-number-mode 1)
;;-----------------------------------------------------------------------------
;; Python
;;-----------------------------------------------------------------------------
(add-hook 'python-mode-hook 'turn-on-font-lock t)
;;-----------------------------------------------------------------------------
;; C/C++
;;-----------------------------------------------------------------------------
(setq auto-mode-alist (cons '("\\.C\\'" . c++-mode) auto-mode-alist))
(setq auto-mode-alist (cons '("\\.h\\'" . c++-mode) auto-mode-alist))
(add-hook 'c-mode-hook 'turn-on-font-lock t)
(add-hook 'c++-mode-hook 'turn-on-font-lock t)
(setq c-default-style "bsd"
  c-basic-offset 4)

(defun my-c++-mode-hook ()

;;switch/case:  make each case line indent from switch
  (c-set-offset 'case-label '+)

;; Automatically indent after a newline (like vi)
(local-set-key '[(return)] 'newline-and-indent)

;; Tab sanity: match the C indent, but don't insert new tabs (use spaces)
  (setq tab-width 4)
  (setq indent-tabs-mode nil))

(add-hook 'c++-mode-hook 'my-c++-mode-hook)

;;-----------------------------------------------------------------------------
;; LaTeX
;;-----------------------------------------------------------------------------
;;(setq auto-mode-alist (append '(("\\.tex$"  . LaTeX-mode)) auto-mode-alist))
;;(require 'tex-site)
;;(add-hook 'LaTeX-mode-hook
;;  '(lambda()
;;     (load-file "~/.xemacs/my-latex.el")  ; load these LaTeX preferences
;;     ))

;;-----------------------------------------------------------------------------
;; Abbreviations
;;-----------------------------------------------------------------------------
;;(setq-default abbrev-mode t)
;;(setq save-abbrevs t)
;;(setq abbrev-file-name "~/.xemacs/my-abbreviations.el"
;;(if (file-readable-p abbrev-file-name)
;;  (read-abbrev-file abbrev-file-name)
;;  )

自定义.el 文件:

(custom-set-variables)
(custom-set-faces)

(setq minibuffer-max-depth nil)

my-abbreviations.el 文件:

(define-abbrev-table 'text-mode-abbrev-table '(
  ("\\a" "\\alpha" nil 0)
 )
)
4

0 回答 0