SawPad

Posts tagged with "Emacs"

Emacs MuseMode

Tuesday, May 9, 2006 4:38:33 AM

Emacs wiki停止开发，Muse为其后继，可以输出html,xhtml,pdf,Tex等等多种格式:
Emacs MuseMode

下载后解压把子目录里面的lisp目录的东西放到合适地方(或者干脆扔到已有的lisp load_path中，免去下面loadpath的配置)，然后修改dot emacs:

(add-to-list 'load-path "/path/to/muse/lisp")     
     (require 'muse-mode)     ; load authoring mode     
     (require 'muse-html)     ; load publishing styles I use
     (require 'muse-project)  ; project list below:  
     (setq muse-project-alist
           '(("website"; my various writings
              ("/path/to/muse/files" :default "index")
              (:base "html" :path "/path/to/muse_html/publish")
              (:base "pdf" :path "/path/to/muse_html/publish"))))
              ;;add other projects above yourself.

之后，可以通过

M-x customize-variable

来定制那些以"muse-html-"打头的变量以个性化生成的页面风格。

其语法与Emacs wiki基本相同，更多参看Emacs MuseMode。

1 comment

Emacs wiki

Monday, May 1, 2006 3:18:52 PM

Emacs

dot el's:
Download

In my dot_emacs:

(require 'emacs-wiki)
(add-hook 'emacs-wiki-mode-hook
  (lambda ()
    (define-key emacs-wiki-mode-map (kbd "C-c C-h") 'emacs-wiki-preview-html)
    (define-key emacs-wiki-mode-map (kbd "C-c C-c") 'emacs-wiki-preview-source)
    (define-key emacs-wiki-mode-map (kbd "C-c C-v") 'emacs-wiki-change-project)
))

(setq emacs-wiki-publishing-directory "publish")

(setq emacs-wiki-directories '("D:/work/wiki"))
(setq emacs-wiki-meta-charset "gb2312")
(setq emacs-wiki-style-sheet
      "<LINK rel=\"stylesheet\" href=\"css/wiki.css\" media=\"screen\">")

(setq emacs-wiki-inline-relative-to 'emacs-wiki-publishing-directory)
(defun emacs-wiki-preview-source ()
  (interactive)
  (emacs-wiki-publish-this-page)
  (find-file (emacs-wiki-published-file)))
(defun emacs-wiki-preview-html ()
  (interactive)
  (emacs-wiki-publish-this-page)
  (browse-url (emacs-wiki-published-file)))

No comments

Emacs Rails扩展

Saturday, April 22, 2006 5:11:36 AM

Emacs

Emacs Rails Mode:(Project@Rubyforge)

dot el's:

Add to your .emacs file:

  (defun try-complete-abbrev (old)
   (if (expand-abbrev) t nil))

  (setq hippie-expand-try-functions-list
       '(try-complete-abbrev
         try-complete-file-name
         try-expand-dabbrev))

  (require 'rails)

另:
http://www.damtp.cam.ac.uk/user/sje30/emacs/ell.html
大部分听说过的el都能找到，不用到处乱跑了...

7 comments