~fumi/ChangeLog

http://www.gohome.org/gesture/

マウスジェスチャで Emacs を操作するためのマイナーモード．

  (eval-after-load "ispell"
    '(setq ispell-skip-region-alist (cons '("[^A-Za-z0-9 -]+")
                                          ispell-skip-region-alist)))

via: いやな日記 2003-11-26
     http://namazu.org/~satoru/diary/?date=20031126#p01

メモに影響のある変更は，日付けの書式変更くらい．

[YYYY/MM/DD] -> [YYYY-MM-DD]

既存のメモの日付け書式変更は

  find . -name '*.howm' -print | xargs -n 1 ruby -p -i.bak -e '$_.gsub!(%r!(\D)(\d{4}/\d{2}/\d{2})(\D)!){|s| $1 + ($2.tr "/", "-") + $3}'

参考
- 日付の表記に関するノート
  http://www.kanzaki.com/docs/html/dtf.html

入門 Meadow / Emacs p.248 より．

;; dabbrev
;; 日英混在文用の設定
(defadvice dabbrev-expand
  (around modify-regexp-for-japanese activate compile)
  "Modify `dabbrev-abbrev-char-regexp` dynamically for Japanese words."
  (if (bobp)
      ad-do-it
    (let ((dabbrev-abbrev-char-regexp
	   (let ((c (char-category-set (char-before))))
	     (cond
	      ((aref c ?a) "[-_A-Za-z0-9]") ; ASCII
	      ((aref c ?j)                  ; Japanese
	       (cond
		((aref c ?K) "\\cK")        ; Katakana
		((aref c ?A) "\\cA")        ; 2 byte alphanumeric
		((aref c ?H) "\\cH")        ; hiragana
		((aref c ?C) "\\cC")        ; kanji
		(t "\\cj")))
	      ((aref c ?k) "\\ck")          ; hankaku-kana
	      ((aref c ?r) "\\cr")          ; Japanese roman ?
	      (t dabbrev-abbrev-char-regexp)))))
      ad-do-it)))

入門Meadow/Emacs / 小関吉則

http://bonobo.gnome.gr.jp/~nakai/geadow/

http://www.taiyaki.org/elisp/text-adjust

board mode の先頭に各板の logo を表示．

設定
~/.navi2ch/init.el に以下を追加．

  (when (eq window-system 'x)
    (require 'navi2ch-logo)
    (add-hook 'navi2ch-hook 'navi2ch-logo-init))

http://www.m17n.org/m17n2000_all_but_registration/proceedings/kawabata/jisx0213.html

移行にともない，ファイルの変換などを行なう．
ちょっと重くなったかも．

http://www.geocities.co.jp/SiliconValley-PaloAlto/7043/index.html#spamfilter.el

バージョン 0.11 からコーパスファイルのフォーマットを変更しました.
バージョン 0.10 までのコーパスファイルを使っている場合は,
付属の変換スクリプトでコーパスファイルを変換してください.

.skk-jisyo を migemo のユーザ辞書に変換して使う．

.skk-jisyo の変換

ruby /usr/lib/ruby/1.8/migemo-convert.rb < ~/.skk-jisyo >~/.migemo-user-dict

.emacs に設定を追加

  (setq migemo-user-dictionary (expand-file-name "~/.migemo-user-dict"))

Emacs part9
http://pc.2ch.net/test/read.cgi/unix/1058495083/ より．

  From: [240] 名無しさん＠お腹いっぱい。 <>
  Date: 03/08/10 10:24
  
  emacs初心者です。お盆休みの間にある程度使えるように練習しているのですが
  わからないことだらけです。
  
  1. ソース上の関数名を指定
  2. その関数名を配下のディレクトリでgrep
  3. 結果の一覧から、定義されているファイルを開く
  
  という操作をemacs上でやりたいのですが、どうすればいいのでしょうか？
  
  <環境>
  OS: Linux
  emacs:  21.2
  _______________________________________________________________________________
  
  From: [241] 名無しさん＠お腹いっぱい。 <sage>
  Date: 03/08/10 10:58
  
  関数の定義場所に飛びたいなら。。
  1. M-x compile -> etags *.[ch]
  　 で TAGS ファイルを作って
  
  2. M-. 関数名入力(または関数の上にカーソルのっければそれが Default)
  
  3. で戻るときは M-*
  
  1. で zsh なら etags **/*.[ch] すれば下のディレクトリまで再帰的に探しにいく。
  別の shell なら find 使うとか何とか。
  _______________________________________________________________________________
  
  From: [242] 名無しさん＠お腹いっぱい。 <sage>
  Date: 03/08/10 11:14
  
  >>>241
  -Rでできるのでは?
  _______________________________________________________________________________
  
  From: [243] 名無しさん＠お腹いっぱい。 <sage>
  Date: 03/08/10 17:47
  
  >>>240
  > という操作をemacs上でやりたいのですが、どうすればいいのでしょうか？
  
  他の解も出ていますが、こんな方法もあります。
  emacs を調べたいディレクトリで、立ち上げていなければ、とりあえず、
  M-x cd で、でぃディレクトリを移動します。その後、
  M-x grep で、調べたい関数と、ファイル名をいれます。配下すべてというこ
  とであれば、デフォルトで出てきたオプションを少し変更します。
  grep -nRH -e 調べたい関数 *
  のようにすれば良いでしょう。出てきた結果のバッファで、マウスの中ボタン
  か、カーソルを移動して、C-cC-c とすれば目的のファイルを開いて、目的の
  行の1カラム目にカーソルが移動します。
  _______________________________________________________________________________

http://www.geocities.co.jp/SiliconValley-PaloAlto/7043/index.html
コーパスファイルのフォーマットが変更され，それに合わせ，
変換スクリプトが用意された．変換方法は次の通り．

  % cp -p ~/.spamfilter ~/.spamfilter.org
  % perl convert_corpus_0.9_to_0.10.pl ~/.spamfilter > ~/.spamfilter.new
  % mv ~/.spamfilter.new ~/.spamfilter

複数コーパスに対応．

http://navi2ch.sourceforge.net/navi2ch-spamfilter.el

Navi2ch for Emacs (Part 11)
http://pc.2ch.net/test/read.cgi/unix/1065246418/38- より．

http://www.geocities.co.jp/SiliconValley-PaloAlto/7043/
のベイジアンフィルタを利用した navi2ch 用フィルタ．

Navi2ch for Emacs (Part 10)
http://pc.2ch.net/test/read.cgi/unix/1054769287/ より．

  From: [777] 名無しさん＠お腹いっぱい。 <sage>
  Date: 03/08/31 00:56
  
  > 既読スレッドだけ上にまとめて表示
  どのマークが付いてるのが一番上にくるといいのですか？
  
  S-s によるソート順は navi2ch-bm-sort-by-state-order で設定
  できるので、私はこんな感じにしてます。
  
  (setq navi2ch-bm-sort-by-state-order
        (let ((n 0))
          (mapcar
           '(lambda (x) (cons x (1- (setq n (1+ n)))))
           '("% "
             "%U" "+U" " U"
             "%V" "+V" " V"
             "%C" "+C" " C"
             "=U" "=V" "=C" "= "
             "+ " "  "))))

;; 連続した改行を削除
(defun my-navi2ch-article-collect-newlines ()
  (point-min)
  (while (re-search-forward "\n\n\n+" nil t)
    (replace-match "\n\n" nil nil)))

(add-hook 'navi2ch-article-arrange-message-hook
  'my-navi2ch-article-collect-newlines)

Navi2ch for Emacs (Part 10)
http://pc.2ch.net/test/read.cgi/unix/1054769287/

From: [637] 名無しさん＠お腹いっぱい。 <sage>
Date: 03/08/01 22:11

読んでるスレを直接消す方法って無いですか？（article mode でのスレッド削除です）

最近↓みたいなリンクをiで読み込んだり、飛んでみたりするんだけど。

乳輪でかい女が降臨！！祭ってます！
http://etc.2ch.net/test/read.cgi/intro/1059110657/l20

今は履歴からRしてます。。
_______________________________________________________________________________

From: [639] 名無しさん＠お腹いっぱい。 <sage>
Date: 03/08/03 03:42

>>>637
~/.navi2ch/init.el に こんなの書いてるけど、あんま使ってないなあ。

(define-key navi2ch-article-mode-map "\C-c\C-d"
  'navi2ch-article-remove-article)
(defun navi2ch-article-remove-article ()
  "現在のスレの情報を消す。"
  (interactive)
  (navi2ch-bm-remove-article-subr navi2ch-article-current-board
                                  navi2ch-article-current-article)
  (let ((buf (navi2ch-article-current-buffer)))
    (if buf
        (switch-to-buffer buf)
      (navi2ch-list))))

(auto-compression-mode t)

migemo と T-Code が衝突するもよう．

- 現象
migemo でサーチを行なうと，マッチする日本語もハイライトされるが，
\C-s，\C-r で日本語に移動できない．

- 対策
.tc に以下を追加．

(setq tcode-use-isearch nil)

- [debian-users:32575] Re: about migemo
  http://lists.debian.or.jp/debian-users/200204/msg00360.html

http://www.shiro.dreamhost.com/scheme/gauche/index-j.html

UNIX USER に特別企画として Gauche の記事があったので，使ってみる．

とりあえず，Emacs の設定．

(setq scheme-program-name "gosh")
(require 'cmuscheme)
(add-hook
 'inferior-scheme-mode-hook
 '(lambda ()
    (set-buffer-process-coding-system
     'euc-jp 'euc-jp)))

(defun scheme-other-window ()
  "Run scheme on other window"
  (interactive)
  (switch-to-buffer-other-window
   (get-buffer-create "*scheme*"))
  (run-scheme scheme-program-name))

(define-key global-map
  "\C-xS" 'scheme-other-window)

キーバインド

M-C-Space	カーソルの次の S 式をマーク
M-C-a	カーソルを含むトップレベルの S 式の先頭へ
M-C-e	カーソルを含むトップレベルの S 式の末尾へ
M-C-f	次の S 式へ
M-C-b	前の S 式へ
M-C-t	カーソルの前後の S 式を交換
M-C-d	1 レベル内側の S 式へ
M-C-u	1 レベル外側の S 式へ