注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

My Unix World

不要迷恋Unix,Unix只是计算世界很小的一部分!

 
 
 

日志

 
 

【Copy】Emacs配置  

2009-01-02 17:56:53|  分类: L-Emacs |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
怎么驶emacs语法高亮?
 
象vim一样?不怎么也配置不来。

我倒!你的emacs是什么版本?新的版本默认就支持拉。
M-x emacs-version

我知道,是21的,我也在用这个

也弄不来 :(

默认emacs有很多功能都没有打开,亚语法高良,只要M-x global-font-lock-mode,把global-font-lock-mode打开就可以了,或者在你的.emacs里面加一句

(global-font-lock-mode t)也一样!

在菜单里也有语法加亮选项的,不过每一次运行Emacs的时候都要执行一次,还不如修改配置文件。

能给出具体的配置文件的内容吗?

兄弟们?


我的dotemacs文件:
代码:
-->
;;***************文件的头部**********************************;;
;; Liu Qi's .emacs file
;; Liu Qi ,Xi'An , Northwest Polytechnical University
;; 12 October 2003
;;***************文件的主体部分******************************;;
;;把 major mode 设置为 text-mode , 而不是 fundamental-mode 。
;;并且在72列处断行。
(setq default-major-mode 'text-mode)
(setq text-mode-hook
      '(lambda nil
        (setq fill-column 72)
        (auto-fill-mode 1)))
;;关闭出错的时候的提示的声音。
(setq visible-bell t)
;;进行语法加亮
(global-font-lock-mode t)
;;显示时间。
(display-time)
;;显示所在列号。
(setq column-number-mode t)
;;显示适当大小的字体.
(set-default-font "8x16")
;;分别针对字符终端模式和X11模式设置背景色,鼠标滚轮,光标的颜色等属性。
(cond ((not window-system)
      ;;在模拟终端中运行Emacs的时候可以使用鼠标。
      (xterm-mouse-mode t)
      )
      ((equal window-system 'x)
      ;;以X11方式运行Emacs的时候激活鼠标滚轮。
      (mouse-wheel-mode t)
      ;;并且设置背景色。
      (set-background-color "DarkSlateGray")
      ;;设置光标的颜色。
      (set-cursor-color "sienna")
      ;;设置X11模式启动的 Emacs 的标题。
      (setq frame-title-format "GNU/Emacs@nwpu.edu.cn")
      ;;关闭 Emacs 的启动画面。
;      (setq inhibit-startup-message t)
      ;;光标躲避鼠标。
      (mouse-avoidance-mode 'animate)
      ;;关闭工具栏.
;      (tool-bar-mode nil)
      ;;关闭菜单栏.
;      (menu-bar-mode nil)
      ;;关闭滚动条.
;      (scroll-bar-mode nil)
      ))
;;Emacs 中关于 ibuffer 的设置
(require 'ibuffer)
(global-set-key (kbd "C-x C-b") 'ibuffer)
;;在Emacs键入M-x run-scheme的时候默认运行mzscheme。
(setq scheme-program-name "mzscheme")
;;定义一些交互式函数,以便可以方便地在Emacs中运行scheme解释器。
(defun run-scsh ()
  "Run scsh in GNU/Emacs"
  (interactive)
  (run-scheme "scsh"))
(defun run-s48 ()
  "Run scheme48 in GNU/Emacs"
  (interactive)
  (run-scheme "scheme48"))
(defun run-mit-scheme ()
  "Run MIT-scheme in GNU/Emacs"
  (interactive)
  (run-scheme "bchscheme"))
(defun run-mzscheme ()
  "Run Mzscheme in GNU/Emacs"
  (interactive)
  (run-scheme "mzscheme"))
(defun run-guile ()
  "Run guile in GNU/Emacs"
  (interactive)
  (run-scheme "guile"))
;;也可以在Emacs中运行clisp(版本号为2.30),M-x run-lisp命令。
(setq inferior-lisp-program "/usr/local/bin/clisp")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;以下是有关Gnus的设置选项
;; gnus news groups
(setq user-mail-address "liuqi@mail.nwpu.edu.cn")
(setq user-full-name "Liu Qi")
(setq gnus-your-organization "Xi'An 710072 P.R.China")
;;nntp setup
(setq gnus-select-method '(nntp "news.yaako.com"))
(custom-set-variables
  ;; custom-set-variables was added by Custom -- don't edit or cut/paste it!
  ;; Your init file should contain only one such instance.
 '(canlock-password "c18c08f7a34b66947e04eca4252118631557bffd"))
(custom-set-faces
  ;; custom-set-faces was added by Custom -- don't edit or cut/paste it!
  ;; Your init file should contain only one such instance.
 )

  评论这张
 
阅读(523)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017