--- /tmp/ifile-gnus.el	Wed Dec 31 16:07:46 2003
+++ ifile-gnus.el	Wed Dec 31 16:01:01 2003
@@ -78,9 +78,12 @@
 	(apply 'call-process-region (point-min) (point-max) 
 	       ifile-program nil icat-buf nil ifile-classify-flags)
 	)
-      (message "ifile: recommendation is \"%s\"" 
-	       (buffer-substring (point-min) (- (point-max) 1)))
-      (buffer-substring (point-min) (- (point-max) 1)))))
+      (let ((recommendation
+	     (replace-regexp-in-string "%20" " " ;; quote hack
+				       (buffer-substring (point-min)
+							 (- (point-max) 1)))))
+	(message "ifile: recommendation is \"%s\"" recommendation)
+	recommendation))))
 
 (defun ifile-spam-filter (other-split)
   (if (and ifile-active (equal (ifile-recommend) "spam"))
@@ -97,7 +100,7 @@
       (setq group (if (member group ifile-spam-groups)
 		      "spam"
 		    "non-spam")))
-  group)
+  (replace-regexp-in-string " " "%20" group))
 
 (defun ifile-learn-about-article (flags message-format group-name)
   (let ((filtered-group-name