[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:08161] Re: フレーム版 switch-to-buffer



> (defun switch-pseudo-frame (name)
>   (interactive (list (completing-read "Frame: "
> 				      (mapcar #'ed::pseudo-frame-name
> 					      ed::*pseudo-frame-list*)
> 				      :must-match t)))
>   (select-pseudo-frame (or (find-pseudo-frame name)
> 			   (error "~aはありません" name))))

うわー、すごい便利です。どうもありがとうございました。

--
加藤木 洋一
ykatogi@xxxxxxxxxxxxxxxxxxx

Index Home