« TwitterIrcGateway(TIG) + irc-mode on xyzzy の TypableMap を使った Favorite や Reply 関連 Lisp | Main | Safari、Opera でも Tab キー(または代替するショートカットキー)を使ってリンクを辿りブラウジングする方法 »



Wed, 10 Feb 2010

irc-mode から clickable-uri を使って適当に URI を開く on xyzzy

Posted at Wed, 10 Feb 2010 in computer::xyzzy

例のごとく現在行で GShiftg)を押すと、URI があった場合に clickable-uri の設定にしたがって URI を開いたりします。
irc-mode に加えて clickable-uri がインストールされている必要があります。

;;;;;;;;;;;;;;;;;;;
;; ■ clickable-uri を利用して適当にURIにジャンプ
(defun irc-goto-uri ()
  (interactive)
  (save-excursion
    (let ((ed (progn (goto-eol) (point))))
      (goto-bol)
      (when (scan-buffer ed::*clickable-uri-regexp* :limit ed)
        (ed::clickable-uri-open)))))
(add-hook '*irc-dialog-mode-hook*
          #'(lambda () (local-set-key #\G 'irc-goto-uri)))

« TwitterIrcGateway(TIG) + irc-mode on xyzzy の TypableMap を使った Favorite や Reply 関連 Lisp | Main | Safari、Opera でも Tab キー(または代替するショートカットキー)を使ってリンクを辿りブラウジングする方法 »