Commits

Frank Fischer committed f423376

quote-objects select first object at or AFTER point

Comments (0)

Files changed (1)

 	    ((nil)
 	     (when (> (match-end 0) p)
 	       (setq retry nil)
-	       (when (<= (match-beginning 0) p)
-		 (setq md (match-data)))))
+	       (setq md (match-data))))
 	    (before
 	     (if (>= (match-beginning 0) p)
 		 (setq retry nil)