朝顔日記

Going My Way: 自分で線を書いて占う手相占い 経由で、手相占い/占い運命鑑 をやってみた。以下私の手相のスクリーンショットです。

以下鑑定結果ですが、結果はコピペ（何）できなかったので、ちまちまと画面から読み取って書き出しました。

運命鑑度

あなたの手相は特 A 級です。運命鑑が見たところ非常に価値のある手相をお持ちであることが見受けらます。

性格

永遠に少年少女の心を忘れない。頭の回転が速く、大胆。プラス思考でどんなことでも糧にできる。創造性があり工夫を凝らす。ようするに頭がよい。論争好きで負けず嫌い。

人間関係

幅広い交友関係を持ち、年下、年上ともうまく付き合える。さわやかで誰に対しても親切でありうけが良く困らない。

恋愛

寂しがりやで依存症。わりとモテルが理想が高いためあまり恋愛経験は積まない。押しに弱く断れない。一度興味がなくなると手のひらをかえしたように冷たくなる。

仕事

大器晩成型で感性を深める時間が必要。機転がよくきき、周りからも一目置かれる。その感性とアイディアを生かせる仕事につけば大成功する。

注意

はっきりものを言うのが災いを生む可能性がある。人付き合いでストレスが溜まりやすく、傷つきやすい。

適職

政治家、評論家、外交官、営業社員、インテリアプランナー、消費生活アドバイザー、ファッションデザイナー

我ながらなかなかいい手相ですね。といっても何回かやってみると毎回違う結果が出たりするんで結構微妙なものなんでしょうか。上記の結果は 1 回目のものではないですが、1 回目のものと同じものです。手相画面、結果画面のスクリーンキャプチャを取り忘れたので、同じ結果を出すのに何回もやる羽目になってしまいました。:p)

C O U L D：その場でページチェック 経由で、Mozilla や Firefox に HTML Tidy ベースの Validator を組み込む拡張、HTML VALIDATOR (based on Tidy) を入れてみた。

この拡張を入れると、ページをロードすると同時に自動で html の文法をチェックしてくれるようになります。以下は、朝顔アンテナ を表示中にステータスバーに表示されたアイコンにマウスを乗せたときに現れるポップアップによる検証結果のスクリーンショットです。

これだけでは、どこがよくないのかわからないですが、このアイコンをダブルクリックするか、ソースを表示させると詳細がわかります。以下、ソースを表示させたところのサムネイル。

左下のペインで、エラー箇所が表示され、それをクリックすることで、上部ソース画面で当該箇所へジャンプすることが出来ます。右下のペインにはエラーの解説が表示されています。これらは、設定で非表示にすることも出来ます。

使い方がよくわかりませんでしたが、Clean Up the Page というボタンがあって、これを使うと、エラーの修正などもできるようです。ここらはいかにも Tidy ゆずりな感じです。

残念なところもひとつ書いておくと、Firefox 1.0.3 では問題ありませんでしたが、ナイトリー（今日は 0415 な beast 版の trunk 使用）ではソース表示のそれぞれのペインの領域の大きさをドラグして変えることができませんでした。ここらは今後に期待ですね。

この日記の記事ごとの個別ページなどにはいわゆるサイドバー（何）があるんですが、割にそっけないのでもう少し何かできないものかと考え中。何があれば閲覧する方に便利でしょうね。何もないほうがいいという説もありますが。

とりあえず、最近のURI メモ 数件とアサマシリンク（何）でも載せてみた。:p)

以前 マクアプ用 lisp でご紹介した xyzzy を使って、カーソル行をタグで括る lisp ですが、インデントしている行なんかだとおもしろくなかったりしてやや不便に思っていました。自分で html を書くときはインデントは使わないので問題ないのですが、人の作ったものをいじる場合なんかもあるので。ちょっとだけ lisp が読めるようになってきたので、調子に乗って改造してみるかと思い立ちました。

元々の lisp は、行末へ行って閉じタグを挿入、その後行頭へ行って開始タグを挿入というような動作になっているので、行頭へ行ったときにカーソル位置の文字コードを判定してタブやスペースだったら一文字進めるというようなルーチンを追加してやればいいのかなぁとか考えながら、xyzzy本 をパラパラ眺めていたら skip-white-forward なんていう便利関数がすでに装備されていることが判明。リファレンス にもちゃんと載っていました。ということで、(skip-white-forward) という1行を追加しただけで目的は達成されました。一応以下に載せておきます。

;;カーソル行をタグで括る（インデント対応）
(defun quote-line-by-tag (&optional (quotetag ""))
  (interactive "*sTag: ") ; s => 文字入力を指示する。
  ; 入力された文字列は quotetag に割り当てられる。
  (setq starttag (string-trim "<>" quotetag))
  (setq endtag (substitute-string starttag " .*" ""))
  (save-excursion
    (goto-eol)
    (insert "</" endtag ">")
    (goto-bol)
    (skip-white-forward)
    (insert "<" starttag ">")))
(require "html+-mode")
(define-key ed::*html+-mode-map* '(#\M-b) 'quote-line-by-tag)

xyzzy で編集中の html ファイルのカーソルのある行のタグを一気に削除できると便利だなと思い、某掲示板で尋ねてみたところ、自分で作るようにとのことだったので作ってみました。

;;カーソル行のタグを削除
(defun del-line-tag ()
(interactive "*")
(save-excursion
  (save-restriction
  (narrow-to-region (progn (goto-eol) (point)) (progn (goto-bol) (point)))
    (goto-char (point-min))
    (replace-buffer "<[^<]+>" "" :regexp t))))
(require "html+-mode")
(define-key ed::*html+-mode-map* '(#\C-c #\d) 'del-line-tag)

html+-mode の時に、C-c d すると、カーソルのある行のタグがすべて削除されるはずです。多分。:p)

(require "html+-mode") のところですが、以前マクアプ用 lisp で、tomoya さんに尋ねられてよくわからなかったんですが、xyzzy本 を読んだら、そこらあたりのことが説明されていて大変勉強になったことを付け加えておきます。