fix compile warnings

elisp/um.el

@@ -39,9 +39,8 @@
 
 (require 'project)
 
-;; Primary path glob for the journal. This allows various mountpoints.
-
-(setq um-journal-path-glob ".*/writing/journal")
+(defvar um-journal-path-glob ".*/writing/journal"
+  "Primary path glob for the journal. This allows various mountpoints.")
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; journal header
@@ -205,6 +204,7 @@ NOTE: this searches in the current project root only.
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; shell integration
 
+;;;###autoload
 (defun um-next (next-file &optional tag skip-header)
   "Takes the next-file generated by the shell script and opens it.
 
@@ -215,9 +215,9 @@ And the option not to insert the um-journal-header.
   (unless skip-header
       (um-journal-header)
       (if tag
-          (progn (previous-line)
+          (progn (forward-line -1)
                  (insert (format "+ %s\n" tag))
-                 (next-line))))
+                 (forward-line))))
   (message (format "creating %s" next-file))
   )