summaryrefslogtreecommitdiff
path: root/bog.el
diff options
context:
space:
mode:
Diffstat (limited to 'bog.el')
-rw-r--r--bog.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/bog.el b/bog.el
index 5c4cc0d..cf71331 100644
--- a/bog.el
+++ b/bog.el
@@ -690,7 +690,8 @@ Generate a file name with the form
(defun bog-staged-files ()
"Return files in `bog-stage-directory'."
- (cl-remove-if #'file-directory-p
+ (cl-remove-if (lambda (f) (or (file-directory-p f)
+ (backup-file-name-p f)))
(directory-files bog-stage-directory
t directory-files-no-dot-files-regexp)))