org.el (org-file-contents): Make the message more prominent

* org.el (org-file-contents): Make the message more prominent.
2013-04-06 22:31:13 +02:00 · 2013-04-06 22:31:13 +02:00 · 591d377e78
parent fe93daa72a
commit 591d377e78
1 changed files with 4 additions and 3 deletions
--- a/lisp/org.el
+++ b/lisp/org.el
@ -5145,9 +5145,10 @@ Support for group tags is controlled by the option
  "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 (not noerror)
+	  (error "Cannot read file \"%s\"" file)
+	(message "Cannot read file \"%s\"" file)
+	(sit-for 3))
    (with-temp-buffer
      (insert-file-contents file)
      (buffer-string))))