|
@@ -474,9 +474,11 @@ publishing directory."
|
|
(current-dir (if buffer-file-name
|
|
(current-dir (if buffer-file-name
|
|
(file-name-directory buffer-file-name)
|
|
(file-name-directory buffer-file-name)
|
|
default-directory))
|
|
default-directory))
|
|
|
|
+ (auto-insert nil); Avoid any auto-insert stuff for the new file
|
|
(buffer (if to-buffer
|
|
(buffer (if to-buffer
|
|
(cond
|
|
(cond
|
|
- ((eq to-buffer 'string) (get-buffer-create "*Org DocBook Export*"))
|
|
|
|
|
|
+ ((eq to-buffer 'string)
|
|
|
|
+ (get-buffer-create "*Org DocBook Export*"))
|
|
(t (get-buffer-create to-buffer)))
|
|
(t (get-buffer-create to-buffer)))
|
|
(find-file-noselect filename)))
|
|
(find-file-noselect filename)))
|
|
;; org-levels-open is a global variable
|
|
;; org-levels-open is a global variable
|