X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-score.el;h=260dbceff1e1aba6acd86001d65404e938e4b0d4;hb=36bd162f4f7cd40453b8683e796730836c352b2a;hp=ba7bd6566e0195c65e3dc3bf75ccd15c24c7bcbd;hpb=98661d041ec9ad6afb8a1a08824b77178d4e9cf9;p=elisp%2Fgnus.git-

diff --git a/lisp/gnus-score.el b/lisp/gnus-score.el
index ba7bd65..260dbce 100644
--- a/lisp/gnus-score.el
+++ b/lisp/gnus-score.el
@@ -2602,7 +2602,7 @@ GROUP using BNews sys file syntax."
 	      ;; too much.
 	      (delete-char (min (1- (point-max)) klen))
 	    (goto-char (point-max))
-	    (if (search-backward (string directory-sep-char) nil t)
+	    (if (re-search-backward gnus-directory-sep-char-regexp nil t)
 		(delete-region (1+ (point)) (point-min))
 	      (gnus-message 1 "Can't find directory separator in %s"
 			    (car sfiles))))