2008-11-12から1日間の記事一覧
(defunkey filter-selection #\C-\| (cmd) (interactive "*e| " :history0 'execute) (if (get-selection-type) (let ((s (selection-mark)) (e (selection-point))) (and (> s e) (rotatef s e)) (filter-region cmd s e)) (filter-region cmd))) filter-re…