Re: If arg, open in new frame

[torys.anderson@gmail.com (Tory S. Anderson)]

Almost perfect! Thanks! One case is missed in your code: if buffer does not yet exist, it cannot be opened in a new frame. I tried this to no avail: 

(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))
      (if new-frame
	  (switch-to-buffer-other-frame org-agenda-list) ;; not a buffer
	(org-agenda-list)))))

With all this switch-to-buffer redundancy, what I'd REALLY like to do is conditionally bind the function to a variable based on (if new-frame) but I'll make that a new thread. 

So now,  How can I run org-agenda-list in a new frame if buffer does not exist? 

Thanks


Rusi <rustompmody@gmail.com> writes:

> 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))))