Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Sort posts by file name.

  • Loading branch information...
commit e94cae5ffc4752cc564eb7e99655a59e780730eb 1 parent e801b51
@antifuchs authored
Showing with 6 additions and 3 deletions.
  1. +6 −3 hyde.el
View
9 hyde.el
@@ -202,9 +202,12 @@ E Local unsaved changes"
properly and returns them so that they can be presented to the
user"
(let (
- (posts (split-string (strip-string (shell-command-to-string
- (concat "cd " hyde-home "/" dir " ; " hyde/hyde-list-posts-command ))))))
- (map 'list (lambda (f) (format "%s : %s" (hyde/file-status dir f) f)) posts)))
+ (posts (sort (split-string (strip-string (shell-command-to-string
+ (concat "cd " hyde-home "/" dir " ; " hyde/hyde-list-posts-command ))))
+ (lambda (s1 s2)
+ (string-lessp s2 s1)))))
+ (map 'list (lambda (f) (format "%s : %s" (hyde/file-status dir f) f))
+ posts)))
(defun hyde/promote-to-post (pos)
(interactive "d")
Please sign in to comment.
Something went wrong with that request. Please try again.