aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/org
diff options
context:
space:
mode:
authorMattias EngdegÄrd2020-04-16 12:05:02 +0200
committerMattias EngdegÄrd2020-04-16 12:14:38 +0200
commitd5a7df8c02f04102d50a5cd2290262f59f2b1415 (patch)
tree6d0842717c72525cc866b9e6ad927a33288b26bd /lisp/org
parent7839390f271211882414f167e8e680b3154ee929 (diff)
downloademacs-d5a7df8c02f04102d50a5cd2290262f59f2b1415.tar.gz
emacs-d5a7df8c02f04102d50a5cd2290262f59f2b1415.zip
Use directory-files-no-dot-files-regexp wherever possible
Suggested by Paul Eggert. * lisp/files.el (directory-files-no-dot-files-regexp): Clarify semantics and purpose. * lisp/dired.el (dired-re-no-dot): Define as obsolete alias of directory-files-no-dot-files-regexp. (dired-delete-file): * lisp/gnus/gnus-util.el (gnus-delete-directory): * lisp/net/ange-ftp.el (ange-ftp-delete-directory): * lisp/obsolete/vc-arch.el (vc-arch-trim-revlib): * lisp/org/ob-core.el (org-babel-remove-temporary-directory): * lisp/vc/vc-rcs.el (vc-rcs-unregister): Use directory-files-no-dot-files-regexp.
Diffstat (limited to 'lisp/org')
-rw-r--r--lisp/org/ob-core.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/org/ob-core.el b/lisp/org/ob-core.el
index debc27cfbff..fe9af1ce602 100644
--- a/lisp/org/ob-core.el
+++ b/lisp/org/ob-core.el
@@ -3053,9 +3053,8 @@ of `org-babel-temporary-directory'."
3053 (if (eq t (car (file-attributes file))) 3053 (if (eq t (car (file-attributes file)))
3054 (delete-directory file) 3054 (delete-directory file)
3055 (delete-file file))) 3055 (delete-file file)))
3056 ;; We do not want to delete "." and "..".
3057 (directory-files org-babel-temporary-directory 'full 3056 (directory-files org-babel-temporary-directory 'full
3058 (rx (or (not ".") "...")))) 3057 directory-files-no-dot-files-regexp))
3059 (delete-directory org-babel-temporary-directory)) 3058 (delete-directory org-babel-temporary-directory))
3060 (error 3059 (error
3061 (message "Failed to remove temporary Org-babel directory %s" 3060 (message "Failed to remove temporary Org-babel directory %s"