32nd Diary

トップ | 最新 | 過去の日記 | もっと過去の日記

2006年
7月
1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31
めーるあどれす
ruby -rbase64 -e'puts Base64.decode64 %q(dGFrYW5vMzJAZ21haWwuY29t)'



2006-07-01 (Saturday) [長年日記]

[Univ][Study][Life] 寝てしまった

ちょっと起きて食事して,また寝たら19:00とかマジアリエネー...

相変わらず原稿執筆中.

  • はじめに
  • 既存の手法
  • 提案手法
  • 考察 ← いまここ
  • まとめ

箇条書きにした内容を文章にしている段階です. 週末に初版を出すと言ったので念心,執筆.

追記.先ほど初版を書き上げ,送信しました.(20:00

[Game][Study] ビオサバール

Age of Empires で船に乗ってる人がたまに「ビオサバール」って言ってる気がするんだけど, 同じように聞こえる方はいませんか?

ちなみに,ビオサバールというのは物理法則の名前です. → ビオ・サバールの法則

[Media] 勝訴と敗訴

裁判所から人が駆け出してきて, 毛筆で「勝訴」って書かれた紙をバッと広げる様子をテレビでよく見るじゃん.

あれってさぁ「敗訴」って書かれたやつ見たことないよね...

いかにもな紙をもった人が裁判所から駆け出してきた時点で情報量としては十分なんじゃないか?

[zsh] zshの^

zshの^を使うと「〜以外」という展開ができる. ちょうどWindowsのエクスプローラにある[編集] - [選択の切り替え]みたいな感じだ.

% touch hoge fuga foo bar
% echo *
  bar  foo  fuga  hoge
% echo ^hoge
  bar foo fuga
% echo ^hoge ^fuga
  bar foo fuga bar foo hoge
% echo ^(hoge|fuga)
  bar foo

使いこなせれば便利そう.

[Emacs][Lisp] indent-buffer

いつのことだか忘れましたが, indent-regionを使って,indent-bufferを書きました. バッファの内容をインデントする関数です.

ついでにtabifyとかuntabifyもできるようにしてみました.

M-x indent-buffer
バッファをindentする
C-u M-x indent-buffer
バッファをtabifyしてからindentする
C-u C-u M-x indent-buffer
バッファをuntabifyしてからindentする
(defun indent-buffer (&optional arg)
  "indent buffer"
  (interactive "p")
  (indent-region (point-min) (point-max) nil)
  (if (= 4 arg) (tabify-buffer))
  (if (= 16 arg) (untabify-buffer))
  (message "indent buffer")
  )

(defun tabify-buffer()
  "tabify buffer"
  (interactive)
  (tabify (point-min) (point-max))
  (message "tabify buffer")
  )

(defun untabify-buffer()
  "untabify buffer"
  (interactive)
  (untabify (point-min) (point-max))
  (message "untabify buffer")
  )

昔書いたソースコードを今の自分が使っているスタイルに インデントするときに便利です.

[TeX] TeXで\subsubsubsectionを使う

TeXで文章を書いていると\subsubsectionでは 子セクションが足りなくなることが結構あるんですよね.

以下のように文書の先頭などに書くと\subsubsubsectionが 使えるようになります.

\newcommand{\subsubsubsection}{\@startsection{paragraph}{4}{\z@}%
  {1.5\Cvs \@plus.5\Cdp \@minus.2\Cdp}%
  {.5\Cvs \@plus.3\Cdp}%
  {\reset@font\normalsize}
}

cl.pocari.orgの 記事からフォントの指定を削ってみました.うむ,割と自然です.

ただ,本質的には\paragraphの上書きなので, \paragraphを使っているところは{\bf }とかにするしかないですね.

[Emacs] ibufferを自動更新...できない!

いままで C-x C-b にはelectric-buffer-list を割り当てていたのだけれど, ibuffer の方が便利という噂を聞きつけ,切り替えた.

;(require 'ibuffer)
(global-set-key "\C-x\C-b" 'ibuffer)

require はディストリビューションによっては必要です. Debianはパッケージ(emacs-goodies-el)を導入した時点で不要みたい.

ところが,存在するバッファが増減してもバッファのリストが更新されない. どうやら,gを押すとibuffer-updateされて更新されるみたいだ. こんなの自動でやりたいんじゃー!というわけで下記のように書いてみた.

(add-hook 'ibuffer-hooks
         (lambda ()
             (ibuffer-update))
           )

が,エラーを起こすだけでうんともすんとも言わん. おそらくibufferを起動している途中でibuffer-updateを発行して 混乱させてしまっているのだと思う.

どうすりゃいいんだろう...

[Diary][Log][Ruby] かなフィルター

またまたコメントスパムがきたので,導入しました.

tdiary/filter以下にkana.rbというファイルを以下の内容で作成

module TDiary
  module Filter
    class KanaFilter < Filter
      def comment_filter( diary, comment )
        /[ぁ-んァ-ヶ]/ === comment.name + comment.body
      end
    end
  end
end

コメントをする場合はひらがなかカタカナを含んだコメントでお願いします(普通そうなると思いますけど).

しかし,一昨日くらいには中国からのスパムと思わしき,漢字のスパムも来ていたので油断できないなぁ... ひらがなのスパムがきたらどうしよう...

本日のツッコミ(全4件) [ツッコミを入れる]
tenkoma (2006-07-02 (Sunday) 00:29)

敗訴って書いちゃったら負けを認めたことになると思ってか「不当判決」とか出しますよね.確か.

tyv (2006-07-02 (Sunday) 00:33)

敗訴のときは「不当判決」とか書かれた紙をだすのを見たことがあるなぁ

32 (2006-07-02 (Sunday) 01:39)

うおっ,そう言われてみればそれは見た覚えがある!すっかり忘れていた...<br>ところで,そこそこの結果だったらどうするんだろうね?「微妙」?

きむら (2006-07-02 (Sunday) 17:17)

「敗訴」はありませんが、代わりに「不当判決」とかを使っていたような。

本日のPingbacks(全0件)