2008-01-31から1日間の記事一覧
(defun anything-c-space-match-any-greedy (candidate) (let ((pattern (concat "" anything-pattern)) (replaced-re)) (setq replaced-re (while (string-match "\\([ \t]+\\)" pattern) (setq pattern (replace-match ".*" nil nil pattern 1)))) (string…
anything便利すぎるけど(length anything-sources)が10近くになってくると遅く感じるときがあるので特定のsourceで呼び出したいときがある。 anythingのuiをお借りするイメージ。 自分はこんなマクロを使っています。 気軽に使えるしunwind-protectに展開さ…
友達から電話がかかってくると必ず 「おっす、今テンション高い?」 から会話がはじまる。 テンション低いとreturnして先に進まない。 ポーリングして相手がreadyになるのをまつか。 それかこっちから定期的に状態を伝えるか。 どっちかで迷う。