Browse Source

org-export: Do not use `always' not available in Emacs <28

* lisp/ox.el (org-export--generate-copy-script): Use explicit `lambda'
instead of `always', which is not yet available in all the supported
Emacs versions.

Reported-by: Kyle Meyer <kyle@kyleam.com>
Ihor Radchenko 2 years ago
parent
commit
233ad88651
1 changed files with 1 additions and 1 deletions
  1. 1 1
      lisp/ox.el

+ 1 - 1
lisp/ox.el

@@ -2693,7 +2693,7 @@ The function assumes BUFFER's major mode is `org-mode'."
 	    (overlay-put (make-overlay start end) 'invisible invis))
 	    (overlay-put (make-overlay start end) 'invisible invis))
           ;; Never write the buffer copy to disk, despite
           ;; Never write the buffer copy to disk, despite
           ;; `buffer-file-name' not being nil.
           ;; `buffer-file-name' not being nil.
-          (setq write-contents-functions (list #'always)))))))
+          (setq write-contents-functions (list (lambda (&rest _) t))))))))
 
 
 (defun org-export--delete-comment-trees ()
 (defun org-export--delete-comment-trees ()
   "Delete commented trees and commented inlinetasks in the buffer.
   "Delete commented trees and commented inlinetasks in the buffer.