Re: If arg, open in new frame

[Rusi]

On Wednesday, September 10, 2014 5:32:30 PM UTC+5:30, Tory S. Anderson wrote:
> So, that half answered my question: thanks for showing me how to use optional 
> args. My function is now:

> (defun go-or-make-agenda (&optional new-frame) (interactive "P")
>   (let ((buffer "\*Org Agenda\*"))
>     (if (get-buffer buffer)
>       (switch-to-buffer buffer)
>       (org-agenda-list))))

Does this help?

(defun go-or-make-agenda (&optional new-frame)
  (interactive "P")
  (let ((buffer "\*Org Agenda\*"))
    (if (get-buffer buffer)
        (if new-frame
            (switch-to-buffer-other-frame buffer)
          (switch-to-buffer buffer))
      (org-agenda-list))))