forked from mirrors/org-mode
Merge branch 'maint'
This commit is contained in:
commit
267cbe5183
|
@ -681,7 +681,7 @@ arguments and pop open the results in a preview buffer."
|
|||
(org-babel-expand-body:generic
|
||||
body params (and (fboundp assignments-cmd)
|
||||
(funcall assignments-cmd params))))))
|
||||
(if (called-interactively-p 'any)
|
||||
(if (org-called-interactively-p 'any)
|
||||
(org-edit-src-code
|
||||
nil expanded
|
||||
(concat "*Org-Babel Preview " (buffer-name) "[ " lang " ]*"))
|
||||
|
|
|
@ -3307,7 +3307,7 @@ If AGENDA-BUFFER-NAME, use this as the buffer name for the agenda to write."
|
|||
(interactive "FWrite agenda to file: \nP")
|
||||
(if (or (not (file-writable-p file))
|
||||
(and (file-exists-p file)
|
||||
(if (called-interactively-p 'any)
|
||||
(if (org-called-interactively-p 'any)
|
||||
(not (y-or-n-p (format "Overwrite existing file %s? " file))))))
|
||||
(user-error "Cannot write agenda to file %s" file))
|
||||
(org-let (if nosettings nil org-agenda-exporter-settings)
|
||||
|
|
Loading…
Reference in New Issue