Browse files

Fixed filename identifying pattern

  • Loading branch information...
1 parent 83e78d3 commit f26f8a41463e82decb7794f0527addc614cb43fc @cefstat committed May 9, 2010
Showing with 4 additions and 4 deletions.
  1. +4 −4 simplenote.el
8 simplenote.el
@@ -308,8 +308,8 @@
(message "Could not retrieve the index. Aborting sync.")
(setq keys-in-index (mapcar '(lambda (e) (cdr (assoc 'key e))) index))
- (setq files (directory-files (simplenote-notes-dir) t "^[a-zA-Z0-9_\\-]\\{36\\}$"))
- (setq files-marked-deleted (directory-files (simplenote-trash-dir) t "^[a-zA-Z0-9_\\-]\\{36\\}$"))
+ (setq files (directory-files (simplenote-notes-dir) t "^[a-zA-Z0-9_\\-]+$"))
+ (setq files-marked-deleted (directory-files (simplenote-trash-dir) t "^[a-zA-Z0-9_\\-]+$"))
;; If a file has been marked locally as deleted then sync the deletion and
;; delete from the file system provided that the corresponding key is in
@@ -470,9 +470,9 @@
(let (files)
(setq files (append
(mapcar '(lambda (file) (cons file nil))
- (directory-files (simplenote-notes-dir) t "^[a-zA-Z0-9_\\-]\\{36\\}$"))
+ (directory-files (simplenote-notes-dir) t "^[a-zA-Z0-9_\\-]+$"))
(mapcar '(lambda (file) (cons file t))
- (directory-files (simplenote-trash-dir) t "^[a-zA-Z0-9_\\-]\\{36\\}$"))))
+ (directory-files (simplenote-trash-dir) t "^[a-zA-Z0-9_\\-]+$"))))
(when files
(setq files (sort files '(lambda (p1 p2) (simplenote-file-newer-p (car p1) (car p2)))))
(widget-insert "== NOTES\n\n")

0 comments on commit f26f8a4

Please sign in to comment.