Comment fix.

[gnu-emacs] / lisp / gnus / nnkiboze.el

diff --git a/lisp/gnus/nnkiboze.el b/lisp/gnus/nnkiboze.el
index 6fba5d08b45ab72125d2906f28454a23e22ca04b..971d74a8f2e33ec4d4cc3eded03030223db984a9 100644 (file)
--- a/lisp/gnus/nnkiboze.el
+++ b/lisp/gnus/nnkiboze.el
@@ -154,7 +154,9 @@
   (nnkiboze-possibly-change-group group)
   (when force
      (let ((files (list (nnkiboze-nov-file-name)
-                       (concat nnkiboze-directory group ".newsrc")
+                       (concat nnkiboze-directory
+                                (nnheader-translate-file-chars
+                                 (concat group ".newsrc")))
                        (nnkiboze-score-file group))))
        (while files
         (and (file-exists-p (car files))
@@ -205,8 +207,12 @@ Finds out what articles are to be part of the nnkiboze groups."
 
 (defun nnkiboze-generate-group (group)
   (let* ((info (nth 2 (gnus-gethash group gnus-newsrc-hashtb)))
-        (newsrc-file (concat nnkiboze-directory group ".newsrc"))
-        (nov-file (concat nnkiboze-directory group ".nov"))
+        (newsrc-file (concat nnkiboze-directory 
+                              (nnheader-translate-file-chars
+                               (concat group ".newsrc"))))
+        (nov-file (concat nnkiboze-directory
+                           (nnheader-translate-file-chars
+                            (concat group ".nov"))))
         method nnkiboze-newsrc gname newsrc active
         ginfo lowest glevel orig-info nov-buffer
         ;; Bind various things to nil to make group entry faster.