せいかつのきろく

Lastmodify : Thu, 01 Jan 1970 00:00:00 JST (Thu, 01 Jan 1970 00:00:00 GMT)

[ 最新の日記 ]　 [ はじめに ]　 [ トップページ ]　 [ ログ ]　

Powered by 日記自動化システム「日記分子」Ver1.2 ON hatsukari.zenmai.org
読みたい日付・期間を下のフォームから選んでください(カレンダの年月表示部分をクリックするとその月のすべての日記が読めます)。最終更新日はHTMLのヘッダ部分、di.cgi、rssなどからどうぞ。

＠#20030507(Wednesday)
腐海指数80

▼07a　 てか

あぢい。

そろそろ夏用のすーつ買わなきゃだなぁ(どこにそんな金が

つーか、尻ポケットに入れてある革の財布の臭いが夏を感じさせますネ(はぁと

▼07b　 ぽしごと

昨日は連休明けで激しく鬱でまったく仕事の効率上がらなかったんじゃが、今日はけっこー気持ちよく仕事できた。おえらい先生の原稿も頂けることになったし、永いこと棚上げになってた経理関係の仕事も終わったし。某誌来月号のホームページもあぷできたし。

しかし仕事はまだ腐るほど待っている……鬱だ死のう。

▼07c　 みついすみとも

＠#20030505(Monday)
HIghmoon Highnoon、きっとすぐに見つける。

▼05a　 レソキュウ

久々の3連休〜。2連休ですらまれなので、ひたすらまたーりとしてますた。

いあ、今日は午後出勤の予定だったんでつが、休みましたヽ(´−｀)ノ

▼05b　 Emacs21.2.3導入。

ふとカラフリャでグラフィカリャなEmacsを使いたくなったので、Emacs20.7.2からEmacs21.2.3に乗り換えてみるテスト。生のtarballを取ってきてコンパイルしてみたがうまく通らないので、某所よりPlamoLinux3.0用のパッケージを入手してインストール。しかしXaw3d関係のライブラリが足りないようで起動できず。まぁこのへんもadhocにPlamo3.0のアーカイブからlibXaw3d.so.7あたりをゲットしてきて適当に投げ込んで解決〜。

いちおう古いEmacsも残しておきたかったので、/usr/bin/emacs を Emacs20にリネイムして保存。Emacs21のほうは本体である /usr/local/bin/emcwsのシンボリックリンクを /usr/bin/emacsとして作成。

.emacsのほうはemacsのバージョンを判別して自動的に適切なinit-fileを読ませるように細工。具体的には

(if (string-match "XEmacs" emacs-version)
    (load (expand-file-name "~/.xemacs.el"))
(if (string-match "21" emacs-version)
  (load (expand-file-name "~/.mule.el.emacs21"))
  (load (expand-file-name "~/.mule.el"))
)
)

▼05c　 ついでに e-lispいろいろ

▼05d　 wanderlust

;;;;;;;;;;;;;;;;;;;;;;
;;imを使ってローカルスプールからメイルゲットにょ
(setq wl-default-folder "+inbox")
(defun TT:wl-inc-mail ()
  (interactive)
  (message "Serch local spool ... ")
  (call-process "imget" nil nil nil)
  (if (and (boundp 'wl-summary-buffer-folder-name)
           (eq wl-summary-buffer-folder-name wl-default-folder))
      (wl-summary-sync-force-update)
    (wl-summary-goto-folder-subr wl-default-folder 'force-update nil nil)))
(add-hook 'wl-summary-mode-hook
          (function
           (lambda ()
             (define-key wl-folder-mode-map "i" 'TT:wl-inc-mail))))

;;;;;;;;;;;;;;;;;;;;;
;;送信もimを使うにょ
(setq wl-draft-enable-queuing nil)
(setq im-wl-prog-imput "imput --justqueuing=on")
(autoload 'wl-draft-send-with-imput-async "im-wl")
(setq wl-draft-send-function 'wl-draft-send-with-imput-async)

これでうちのメイル環境は、fetchmail + cron でサーバからメールげっと → procmailが /var/spool/mail/username に転送 → asmailが新着メイルをお知らせ → wanderlustから imgetを呼び出し /home/username/Mail/inbox に転送 → wanderlustでメイルを読む、というシステムになりました。posix環境マンセーですな。

▼05e　 今日は

n日ぶりにお風呂に入り、3週間ぶりに水槽2本の水換えをして、1週間ぶりに部屋の掃除をしたのでかなり満足。あとはおふとんさえ干せればなぁ……。