X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=notmuch.el;h=9b23e3511fbd789e8aaca6ed9c374826b57e475f;hp=96c5d965e1dcf35a6061c307ca5a19022cc292b3;hb=0671436872a37589003860ab31bac40ed04a7cce;hpb=0a7bd1c728390efc5cc000987f6dd42638314328

diff --git a/notmuch.el b/notmuch.el
index 96c5d965..9b23e351 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -877,7 +877,7 @@ thread from that buffer can be show when done with this one)."
                           (setq btn (forward-button 1))
                         (error (setq btn nil)))
                     ))
-                  (beginning-of-buffer)
+                  (goto-char (point-min))
                   ))))
       )))
 
@@ -1152,7 +1152,7 @@ characters as well as `_.+-'.
     (let ((words action-split))
       (when (null words) (error "No operation given"))
       (while words
-	(unless (string-match-p "^[\+\-][_\+\-\\w]+$" (car words))
+	(unless (string-match-p "^[-+][-+_.[:word:]]+$" (car words))
 	  (error "Action must be of the form `+thistag -that_tag'"))
 	(setq words (cdr words))))
     (apply 'notmuch-call-notmuch-process "tag"