diff options
author | Bastien Guerry <bzg@gnu.org> | 2013-12-06 12:21:31 +0100 |
---|---|---|
committer | Bastien Guerry <bzg@gnu.org> | 2013-12-06 12:21:31 +0100 |
commit | 73d3db828e8149847b3666acbc38f94898ac15a9 (patch) | |
tree | 7cd2d596b9cd5c2c54aef94c4cdf900e99009401 /lisp/org/ox-publish.el | |
parent | 64ed4306fc76b2b5386deef8cdd101a2dfe13b74 (diff) | |
download | emacs-73d3db828e8149847b3666acbc38f94898ac15a9.tar.gz |
Merge Org 8.2.4
Diffstat (limited to 'lisp/org/ox-publish.el')
-rw-r--r-- | lisp/org/ox-publish.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/org/ox-publish.el b/lisp/org/ox-publish.el index 67a57fa38ff..d87326d56a7 100644 --- a/lisp/org/ox-publish.el +++ b/lisp/org/ox-publish.el @@ -1225,8 +1225,9 @@ Returns value on success, else nil." (let ((attr (file-attributes (expand-file-name (or (file-symlink-p file) file) (file-name-directory file))))) - (+ (lsh (car (nth 5 attr)) 16) - (cadr (nth 5 attr))))) + (if (not attr) (error "No such file: \"%s\"" file) + (+ (lsh (car (nth 5 attr)) 16) + (cadr (nth 5 attr)))))) (provide 'ox-publish) |