From 591d377e7855e6ee36fd9d8c78e262e9a57305df Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Sat, 6 Apr 2013 22:31:13 +0200 Subject: [PATCH] org.el (org-file-contents): Make the message more prominent * org.el (org-file-contents): Make the message more prominent. --- lisp/org.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 9e156c20a..14ca84aee 100644 --- 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))))