Browse Source

org.el (org-file-contents): Return an empty string instead of the message

* org.el (org-file-contents): Return an empty string instead
of the message.
Bastien Guerry 11 năm trước cách đây
mục cha
commit
a6f81047a4
1 tập tin đã thay đổi với 5 bổ sung5 xóa
  1. 5 5
      lisp/org.el

+ 5 - 5
lisp/org.el

@@ -5153,11 +5153,11 @@ Support for group tags is controlled by the option
 
 (defun org-file-contents (file &optional noerror)
   "Return the contents of FILE, as a string."
-  (if (or (not file)
-	  (not (file-readable-p file)))
-      (if noerror
-	  (message "Cannot read file \"%s\"" file)
-	(error "Cannot read file \"%s\"" file))
+  (if (or (not file) (not (file-readable-p file)))
+      (if (not noerror)
+	  (error "Cannot read file \"%s\"" file)
+	(message "Cannot read file \"%s\"" file)
+	"")
     (with-temp-buffer
       (insert-file-contents file)
       (buffer-string))))