3

フレームのバッファ リストを、同じフレームに表示されるタブバー グループからのタブのバッファ リストに置き換えることによって変更する関数を作成しようとしています。

これは、選択したフレームに表示されるタブバー グループからタブのリストを返すスニペットです。

(mapcar (lambda (tab)
  (buffer-name (tabbar-tab-value tab)))
    (tabbar-tabs (tabbar-current-tabset t)))

次の関数はnil、目的の Modified Buffer List の代わりに戻ります。どんなアイデアでも大歓迎です。

(defun new-buffer-list ()
(interactive)
  (message "Original Buffer List:  %s" (frame-parameter (selected-frame) 'buffer-list))
  (setq new-list
    (mapcar (lambda (tab)
      (buffer-name (tabbar-tab-value tab)))
        (tabbar-tabs (tabbar-current-tabset t))))

  (modify-frame-parameters (selected-frame) (list (cons 'buffer-list new-list)))
  (message "The variable \"new-list\":  %s" new-list)
  (message "Modified Buffer List:  %s" (frame-parameter (selected-frame) 'buffer-list)))
4

1 に答える 1

2 
(frame-parameter 'nil 'buffer-list)

名前ではなく、バッファのリストを返します。したがって、交換したい場合があります

(lambda (tab) (buffer-name (tabbar-tab-value tab)))

と'tabbar-tab-value

于 2013-08-07T19:56:16.957 に答える