Browse Source

Backwards compatibility: use compatibility macro

* lisp/org-agenda.el (org-agenda-write): Use
  org-called-interactively-p instead of called-interactively-p.
Achim Gratz 12 years ago
parent
commit
bdc95549dd
1 changed files with 1 additions and 1 deletions
  1. 1 1
      lisp/org-agenda.el

+ 1 - 1
lisp/org-agenda.el

@@ -3194,7 +3194,7 @@ If AGENDA-BUFFER-NAME, use this as the buffer name for the agenda to write."
 		 (kill-buffer (current-buffer))
 		 (kill-buffer (current-buffer))
 		 (message "Plain text written to %s" file))))))))
 		 (message "Plain text written to %s" file))))))))
     (set-buffer (or agenda-bufname
     (set-buffer (or agenda-bufname
-		    (and (called-interactively-p 'any) (buffer-name))
+		    (and (org-called-interactively-p 'any) (buffer-name))
 		    org-agenda-buffer-name)))
 		    org-agenda-buffer-name)))
   (when open (org-open-file file)))
   (when open (org-open-file file)))