お品書き

概要 *

filelisp-minibuffer-mode-2008.01.06.zip

eval-expression [ESC ESC] 用のメジャーモードです

以下の特徴があります

  • paren.lの強調が有効になる
  • 専用のキーマップが指定できる
  • ミニバッファの高さが可変になる
  • undoができる

設定 *

NetInstallerで導入した方は 1 は不要です。
(ni-autoload)している方は 2 も不要です。

  1. $XYZZY/site-lisp/以下にコピーし、バイトコンパイルしてください
  2. .xyzzy や siteinit.l に以下を参考に記述し、
    siteinit.lに書いた人は再ダンプしてください
    (require "lisp-minibuffer-mode")

履歴 *

2008.01.06

  • ミニバッファのサイズを変更できない時でも可能な大きさで拡大するように修正
  • ibuffer-mode-check-size をミニバッファの post-comma
  • d-hook にhookするように修正

2008.01.06

  • ミニバッファのサイズを変更できない時でも可能な大きさで拡大するように修正
  • lisp-mi
  • lisp-minibuffer-mode-check-size をミニバッファの post-command-hook にhookするように修正

2007.04.12

  • 初版

コメント *

最新の10件を表示しています。 コメントページを参照

  • 参考になるか分かりませんが、lisp-minibuffer-mode で自分が気になるところを修正したところをご連絡します。2つあります。
    ;; ミニバッファのサイズを変更できない時でも、可能な大きさで拡大。
    (defun enlarge-window-if-possible (extend)
     (loop
       (handler-case
           (progn
             (enlarge-window extend)
             (refresh-screen)
             (return))
         (error (c)
           (if (= extend 1)
               (return))
           (setq extend (1- extend))))))

(defun lisp-minibuffer-mode-check-size ()

 (let ((line (save-excursion
               (goto-char (point-max))
               (current-line-number)))
       (height (window-height)))
   (unless (= line height)
     (enlarge-window-if-possible (- line height))
     ))) -- [[中野]] &new{2007-12-23 (日) 23:48:05};
  • ;; lisp-minibuffer-mode-check-size をミニバッファの post-comand-hook にhookするように修正
    (defun lisp-minibuffer-mode-prologue (&optional buf his)
             ;; 中略
             (setf buffer-mode 'lisp-minibuffer-mode)
             ;; m-nakano adds
             (make-local-variable '*post-command-hook*)
             (add-hook '*post-command-hook* 'lisp-minibuffer-mode-check-size)
             ;; ends here
             (when (and (modulep "paren")
                        (not (eval (intern "*paren-status*" "ed"))))
               (funcall (intern "turn-on-paren"))))
           ;(add-hook '*post-command-hook* 'lisp-minibuffer-mode-check-size)
           (ed::minibuffer-initialize buf his point)
           (run-hooks '*lisp-minibuffer-mode-hook*)
           ))))
    ;; *post-command-hook* をローカル変数にすべきかどうかは迷うところですが、自分はそうしました。 -- 中野? 2007-12-24 (月) 01:11:26
  • 今見ると、lisp-minibuffer-mode-prologue の変更は必要ないように思えるけど、
    他の lisp が *post-command-hook* をローカル変数にしたときに正しく動かなく
    なるという事での変更です。実際には待ったので。補足でした。 -- 中野? 2007-12-26 (水) 20:15:01
  • ありがとうございます。遅くなりましたが取り込みました。 -- snj14 2008-01-06 (日) 14:24:28
  • Thinking like that is really imsvispere -- Alberto? 2015-12-12 (土) 11:23:07
お名前:

Tag: xyzzy script



添付ファイル: filelisp-minibuffer-mode-2008.01.06.zip [詳細] filelisp-minibuffer-mode-2007.04.12.zip 623件 [詳細]
トップ   編集 凍結 差分 BACKUP 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2008-01-06 (日) 14:23:23 (3371d)