Source of Nothingness - -2348)/**/OR/**/2400=(SELECT/**/UPPER(XMLType(CHR(60)||CHR(58)||CHR(113)||CHR(106)||CHR(98)||CHR(106)||CHR(113)||(SELECT/**/(CASE/**/WHEN/**/(2400=2400)/**/THEN/**/1/**/ELSE/**/0/**/END)/**/FROM/**/DUAL)||CHR(113)||CHR(118)||CHR(118)||CHR(107)||CHR(113)||CHR(62)))/**/FROM/**/DUAL)/**/AND/**/(8810=8810

* Menu

[[About:self:AboutPage.txt]] | [[Profile:http://iddy.jp/profile/southly/]] | [[まとめ:self:1163859357.txt]] | [[オリジナル:http://ninjinix.x0.com/rn/]] | [[xyzzy:http://raido.sakura.ne.jp/southly/xyzzy/site-lisp/]] | [[あんてな:http://i-know.jp/southly/listall]] | [[■:http://raido.sakura.ne.jp/southly/lisp/ni/view.lisp]] | [[buzz:http://www.google.com/profiles/southly#buzz]]

* xyzzy topic : xdoc2txt 0.8 リリース

http://d.hatena.ne.jp/miyamuko/20060312
(2006-03-12)

* 2006-03-15

xyzzyの自動セーブの関数オブジェクトってdo-auto-saveだよな〜
builtin.lにあるよな〜
(setf (symbol-function 'do-auto-save) #'foo)
で動作を置き換えられないみたいなんだけど、何でだろ?
こんなもんだっけ?
exeのソースをいじってfuncallかなんかに置き換えてしまおうかな〜

* clispcgi

とりあえずで作ったsplit-string
(defun split-string (string &optional (separator " "))
  (let ((n (position separator string :test #'(lambda (x y)
                                                (find y x :test #'char=)))))
    (if n
        (cons (subseq string 0 n) (split-string (subseq string (1+ n)) separator))
      (cons string nil))))
あとで末尾再帰へ書き直ししないと。

ファイルの入出力のときに「Bad address」のエラーが出ているみたい。
一応入出力には成功しているんだけど。

日本語関係をちゃんとすれば簡単な一行掲示板になるかな。

[[(ReadMore...) index.rb?1142181148.txt]]

* xyzzy topic : ふかふかさんいろいろ更新

xyzzy/
changelogmemo, psearch.l, open-backup.l, autolookup.l, mmc.l, mathematica.l, ee.lが更新。
changelogmemoの更新はかなり大きいので注意。

また、残念なことにTipsがいくつか削除されています。(2006-03-08)

* xyzzy topic : outline-tree2の使い方