]> err.no Git - dotfiles/commitdiff
Update thingies
authortfheen <tfheen@8da78d58-1cd3-0310-bee5-d77bd1b3e8bf>
Mon, 15 Sep 2008 14:26:02 +0000 (14:26 +0000)
committertfheen <tfheen@8da78d58-1cd3-0310-bee5-d77bd1b3e8bf>
Mon, 15 Sep 2008 14:26:02 +0000 (14:26 +0000)
git-svn-id: file:///svn/tfheen/trunk/dotfiles@1296 8da78d58-1cd3-0310-bee5-d77bd1b3e8bf

gnus

diff --git a/gnus b/gnus
index 349b70309558fed6c66fa3b239d2ecbb0503cb26..c0741788cca15221ab81add306867b0532a27ccb 100644 (file)
--- a/gnus
+++ b/gnus
@@ -663,10 +663,10 @@ on multiple mail-followup-to headers"
   
 (defun tfheen-mark-as-spam ()
   (interactive)
-;  (let ((buf (get-buffer-create "*Spam mark*"))
-;      (cacheid (tfheen-fetch-cacheid)))
-;    (and cacheid
-;       (start-process "spammark" buf "ssh" "vuizook" "spam" cacheid)))
+  (let ((buf (get-buffer-create "*Spam mark*"))
+       (cacheid (tfheen-fetch-cacheid)))
+    (and cacheid
+        (start-process "spammark" buf "ssh" "vuizook" "spam" cacheid)))
   (gnus-summary-move-article nil (if (stringp tfheen-spam-folder)
                                              tfheen-spam-folder
                                     (apply tfheen-spam-folder nil)) nil 'move)