xyzzy導入メモ

• ダウンロード http://www.jsdlab.co.jp/~kamei/
  • 最新はxyzzy - カスタマイズ可能で軽快な Windows 用テキストエディタ
• 展開して C:\Program Files\xyzzy に置く
• ユーザー環境変数に　XYZZYHOME C:\Program Files\xyzzy を追加
• ツール->共通設定
  • 表示をTABとかスペースとかもするように変更
  • フォント変更
• 表示->ツールバー->バッファ
• ネットインストーラ導入 参考QuickTour/ext/NetInstaller - XyzzyWiki
  • caldixを使ってdllをインストール caldix - kMonos.NET
    • ヘルプ->について からインストールを確認
  • Netinstallerをダウンロード Junk Scripts
  • C:\Program Files\xyzzy\site-lispの中に入れる
  • C:\Program Files\xyzzy\.xyzzyに以下の内容を記述しxyzzyを再起動 参考tips/ネットインストーラのsiteを無理やり最新に - XyzzyWiki

;;;Netinstaller
(require "ni/setup")
(ni-autoload)
(defun ni::add-site-from-wiki ()
(interactive)
(let *1
(car tmp))))
(split-string (match-string 1) #\&)))))
(let (out)
(while
(handler-case
(progn
(push (read-line s) out)
t)
(quit (c)
(return-from ni::add-site-from-wiki))
(error (c)
nil)))
(nreverse out))))
(mapcar (lambda (x) (cdr (assoc "src" x :test 'equal))) ni::*site-data*)
:test 'equal))) t)
(define-key ni::*site-map* #\N 'ni::add-site-from-wiki)

• • M-x netinstallerでNetinstaller起動，Nでサイトを最新のものに更新
  • アローキーで移動，スペースで詳細表示，iでインストール
  • paren, clickable-uri, rv-region, chcolorをインストール
  • C:/Program Files/xyzzy/site-lisp/chcolor/ini/に自分用の色設定をycolorとして保存
• .xyzzy設定
  • 次の分を追加

;;;Incremental Search
(require "isearch")

;;;括弧の強調
(require "paren")
(turn-on-global-paren)
; Fundamental モード対応
(add-hook '*fundamental-mode-hook* #'(lambda()
(set-syntax-match (syntax-table) #\( #\))
(set-syntax-match (syntax-table) #\{ #\})
(set-syntax-match (syntax-table) #\[ #\])
))

;;;キーバインド
(define-key ctl-x-map #\3 'split-window-vertically)
(define-key ctl-x-map '(#\h) 'selection-whole-buffer)

;;;clickable-uri
(require "clickable-uri")
(global-set-key '(#\C-c #\C-o) 'clickable-uri-open)

;;;backup
(require "backup")
(setq *backup-directory* "C:/Users/yambi/backup")
(setq *hierarchic-backup-directory* t)

;;;chcolor
(autoload 'chcolor "chcolor/chcolor" t)
(autoload 'chcolor-specify-file "chcolor/chcolor" t)
(chcolor-specify-file "ycolor")
(setq *chcolor-table* (chcolor-load-from-ini
(merge-pathnames "ycolor" *chcolor-ini-dir*) *chcolor-keylist*))
(chcolor-set 1)

*1:s (ni::http-get-url "http://xyzzy.s53.xrea.com/wiki/index.php?cmd=source&page=NetInstaller%2F%C7%DB%C9%DB%A5%D1%A5%C3%A5%B1%A1%BC%A5%B8%B0%EC%CD%F7"))) (ni::load-site-data) (mapcar (lambda (x) (ignore-errors (ni::site-add x))) (set-difference (remove-if 'null (mapcar (lambda (i) (and (string-match "^:[^|]+|\\(http:.*\\)$" i) (apply #'concat (mapcar (lambda (x) (let ((tmp (split-string x #\;))) (if (equal (car tmp) "amp") (apply #'concat "&" (cdr tmp