«前の日(10-24) 最新 次の日(10-26)» 追記

ソフトウェアと本の覚え書き

2005|10|11|12|
2006|01|02|03|04|05|06|07|08|09|10|11|12|
2007|01|02|03|04|05|06|07|08|09|10|11|12|
2008|01|02|03|04|05|06|07|08|09|10|11|12|
2009|01|02|03|04|05|06|07|08|09|10|11|12|
2010|01|02|03|04|05|06|07|08|09|10|11|12|
2011|01|02|03|04|05|06|07|08|09|10|11|12|
2012|01|02|03|04|05|06|07|08|09|10|11|12|
2013|01|02|03|04|05|06|07|08|09|10|11|12|
2014|01|02|03|04|05|06|07|08|09|10|11|12|
2015|01|02|03|04|05|06|07|08|09|10|11|12|
2016|01|02|03|04|05|06|07|08|09|10|11|12|
2017|01|02|03|04|05|06|07|08|09|10|11|

2007-10-25

_ [読書] ベティ・フリーダン 『老いの泉 下』

歳をとると能力が落ちる一方だという考えが、いろいろな障害になっているようだ。

おすすめ度:★★★★

老いの泉 下


2008-10-25

_ [Emacs] anything-c-source-mark-ring

Emacs で C-u C-SPC とすると mark-ring に保存されているポイントに移動できるのだが、このポイントを anything から選択できれば使いやすいと思い、anything-c-source-mark-ring を作ってみた。

(defvar anything-c-source-mark-ring
  '((name . "mark-ring")
    (candidates . anything-c-source-mark-ring-init)
  (action . (("Goto line" . (lambda (candidate)
			      (goto-line (string-to-number candidate))))))
  ))
(defun anything-c-source-mark-ring-init ()
  (with-current-buffer anything-current-buffer
    (let ((lines (mapcar (lambda (pos)
			   (save-excursion
			     (goto-char pos)
			     (let ((str (thing-at-point 'line)))
			       (format "%7d: %s" (current-line) (if (string-match ".*" str)
									 (match-string 0 str))))
			     ))
			 mark-ring)))
      (sort lines 'string<)
      )))

それにしても Emacs のカスタマイズをする人は Emacs Lisp の関数やイディオムの情報をどこで得たのだろうか。anything-c-source-mark-ring はインターネットの検索と anything-c-source-bm を参考にして何とか作ることができたのだが、全然、Emacs Lisp が使えるようになった気がしない。

[追記] 使ってみると変な動きをしていた。マークがセットされている行数がなぜかおかしくなる。そもそもEmacs Lisp のデバッグの仕方が分からないのが致命的。

本日のツッコミ(全2件) [ツッコミを入れる]

_  [お疲れ様でした。]

_ 管理人 [いつもお世話になっています。ここに書き込んでも反応は乏しいですよ。]


2013-10-25

_ [映画] 『アガサ・クリスティー 華麗なるアリバイ』

おすすめ度:★★★☆☆

アガサ・クリスティー 華麗なるアリバイ

_ [映画] 『NY検事局』

おすすめ度:★★★☆☆

NY検事局


2014-10-25

_ [映画] 『ディープ・インパクト』

おすすめ度:★★★☆☆

ディープ・インパクト

_ [映画] 『夕陽に立つ保安官』

おすすめ度:★★★☆☆

夕陽に立つ保安官

_ [映画] 『クラウド アトラス』

おすすめ度:★★★☆☆

クラウド アトラス


2015-10-25

_ [映画] 『キング・オブ・コメディ』

おすすめ度:★★★★

キング・オブ・コメディ

_ [映画] 『ストレイト・ストーリー』

おすすめ度:★★★☆☆

ストレイト・ストーリー


2016-10-25

_ [映画] 『ダイアナ』

おすすめ度:★★★☆☆

ダイアナ

_ [映画] 『ローラーボール』

1975年の映画。

おすすめ度:★★★☆☆

ローラーボール


2017-10-25

_ [映画] 『最高の人生の選び方』

おすすめ度:★★★☆☆

最高の人生の選び方