mule 2.3 based on emacs-19.34 (canna対応版)インストールログ

[準備]

    emacs-19.34b.tar.gz
    mule-23-1934-alpha01.diff.gz

1. 展開

    tar zxvf emacs-19.34b.tar.gz
    cd emacs-19.34
    zcat mule-23-1934-alpha01.diff.gz | patch -p1

2. コンパイルの準備
  
   ./configure sparc-sun-solaris2.6 --with-gcc --with-x --with-x-toolkit 
       --with-executable=mule --with-emacs-prefix=mule 
       --with-canna --with-canna-includes=/usr/local/canna32/include 
       --with-canna-libraries=/usr/local/canna32/lib 
       --enable-terminal-face --with-terminal-face

   (canna は 3.5 をインストールしたが、3.5のライブラリを使うとうまく動作
    しないので古い 3.2 のライブラリを使っている。make できれば使う分には
    3.5 でも問題ない。また、emacs との共存のため mule 名にしている。)

3. lisp/site-init.el の編集

;;; site-init.el --- local configuration for Mule

;;
;; set local coding system
;;
(set-display-coding-system *euc-japan*)
(set-keyboard-coding-system *euc-japan*)
(set-default-file-coding-system *euc-japan*)
(set-default-process-coding-system *autoconv* *junet*)

;;
;; canna setup
;;
(setq canna-server "www-fue")

;;
;; gnus setup
;;
(autoload 'gnus "gnus" "Read network news." t)
(autoload 'gnus-post-news "gnuspost" "Post a news." t)
(setq gnus-default-nntp-server "fueipc")
(setq gnus-local-domain "fukuoka-edu.ac.jp")
(setq gnus-local-organization "Fukuoka University of Education")
(setq gnus-use-generic-from t)

;;
;;  supercite 3.1
;;
(autoload 'sc-cite-original     "supercite" "Supercite 3.1" t)
(autoload 'sc-submit-bug-report "supercite" "Supercite 3.1" t)
(add-hook 'mail-citation-hook 'sc-cite-original)
(add-hook 'mh-yank-hooks 'sc-cite-original)

(setq sc-electric-references-p nil)
(setq sc-preferred-header-style 1)
(setq sc-citation-leader "")
(setq sc-reference-tag-string ">> ")
(setq sc-nested-citation-p t)

;;
;; mail-signature
;;
(setq mail-signature t)

4. make

   make CFLAGS="-O2" 

5. インストール

   make install

[備考]

   途中で Pure Lisp storage exhausted が出たら、src/puresize.h の
   PURESIZE を大きくして make しなおす。

   また、.emacs で Emacs との共存のために、

  (if(string-match "20." emacs-version)
        (load "~/.emacs20" nil t nil)
        (load "~/.mule" nil t nil))

   のようにしている場合の .mule は以下のとおり。

(if (and (boundp 'CANNA) CANNA)
        (progn
          (load-library "canna")
          (canna)
          (setq canna-use-color t)
))