summaryrefslogtreecommitdiff
path: root/lisp/org-docbook.el
diff options
context:
space:
mode:
authorEric Schulte <schulte.eric@gmail.com>2011-06-14 11:37:59 -0700
committerEric Schulte <schulte.eric@gmail.com>2011-06-14 11:37:59 -0700
commit4f084e14672d4768bbff1614857ca9218230df69 (patch)
tree4799577dabda3846c15a147b68be6ffc1cc74573 /lisp/org-docbook.el
parent95f9aa5ff543b0e46af84244868f4f70bafd2086 (diff)
replacing calls to now-defunct function `interactive-p'
* lisp/org-agenda.el (org-agenda-redo): Replacing call to now-defunct function `interactive-p'. (org-agenda-show-1): Replacing call to now-defunct function `interactive-p'. (org-agenda-set-tags): Replacing call to now-defunct function `interactive-p'. * lisp/org-ascii.el: Replacing call to now-defunct function `interactive-p'. (org-export-as-latin1): Replacing call to now-defunct function `interactive-p'. (org-export-as-latin1-to-buffer): Replacing call to now-defunct function `interactive-p'. (org-export-as-utf8): Replacing call to now-defunct function `interactive-p'. (org-export-as-utf8-to-buffer): Replacing call to now-defunct function `interactive-p'. (org-export-region-as-ascii): Replacing call to now-defunct function `interactive-p'.Replacing call to now-defunct function `interactive-p'. * lisp/org-docbook.el: Replacing call to now-defunct function `interactive-p'. (org-export-region-as-docbook): Replacing call to now-defunct function `interactive-p'.Replacing call to now-defunct function `interactive-p'. * lisp/org-html.el: Replacing call to now-defunct function `interactive-p'. (org-export-region-as-html): Replacing call to now-defunct function `interactive-p'.Replacing call to now-defunct function `interactive-p'. * lisp/org-latex.el: Replacing call to now-defunct function `interactive-p'. (org-export-region-as-latex): Replacing call to now-defunct function `interactive-p'.Replacing call to now-defunct function `interactive-p'. * lisp/org-macs.el: Replacing call to now-defunct function `interactive-p'. (org-called-interactively-p): Replacing call to now-defunct function `interactive-p'.Replacing call to now-defunct function `interactive-p'. * lisp/org-table.el: Replacing call to now-defunct function `interactive-p'. (org-table-blank-field): Replacing call to now-defunct function `interactive-p'. (org-table-current-column): Replacing call to now-defunct function `interactive-p'.Replacing call to now-defunct function `interactive-p'. (org-table-current-dline): Replacing call to now-defunct function `interactive-p'.Replacing call to now-defunct function `interactive-p'. (org-table-sort-lines): Replacing call to now-defunct function `interactive-p'. (org-table-sum): Replacing call to now-defunct function `interactive-p'. (org-table-rotate-recalc-marks): Replacing call to now-defunct function `interactive-p'. (org-table-eval-formula): Replacing call to now-defunct function `interactive-p'. (orgtbl-send-table): Replacing call to now-defunct function `interactive-p'. * lisp/org.el: Replacing call to now-defunct function `interactive-p'. (org-mode): Replacing call to now-defunct function `interactive-p'. (org-copy-subtree): Replacing call to now-defunct function `interactive-p'. (org-paste-subtree): Replacing call to now-defunct function `interactive-p'. (org-store-link): Replacing call to now-defunct function `interactive-p'. (org-todo): Replacing call to now-defunct function `interactive-p'. (org-occur): Replacing call to now-defunct function `interactive-p'.
Diffstat (limited to 'lisp/org-docbook.el')
-rw-r--r--lisp/org-docbook.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-docbook.el b/lisp/org-docbook.el
index 124e1dc7b..0c233c9f9 100644
--- a/lisp/org-docbook.el
+++ b/lisp/org-docbook.el
@@ -320,7 +320,7 @@ could call this function in the following way:
When called interactively, the output buffer is selected, and shown
in a window. A non-interactive call will only return the buffer."
(interactive "r\nP")
- (when (interactive-p)
+ (when (called-interactively-p 'any)
(setq buffer "*Org DocBook Export*"))
(let ((transient-mark-mode t)
(zmacs-regions t)
@@ -332,7 +332,7 @@ in a window. A non-interactive call will only return the buffer."
nil nil
buffer body-only))
(if (fboundp 'deactivate-mark) (deactivate-mark))
- (if (and (interactive-p) (bufferp rtn))
+ (if (and (called-interactively-p 'any) (bufferp rtn))
(switch-to-buffer-other-window rtn)
rtn)))