🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: gnu.emacs.vm.bug
Article #763

Re: feature request: sa-learn and vm?

#763
From: pjf
Date: Tue, 22 Apr 2003 17:09
61 lines
3022 bytes
Howdy,

This is what I did to incorporate sa-learn. It's a crude hack, btw...

I added these lines to my .vm:

(defun pjf::learn-spam ()
  "save the current message to $HOME/spam and then call the sa.sh script to learn spam!"
  (interactive)
  (vm-save-message "/home/zinc/spam")
  (shell-command "/home/zinc/bin/sa.sh")
)
(define-key vm-folders-summary-mode-map (read-kbd-macro "M-o") 'pjf::learn-spam)


The shell script looks like this:

==========================================
#!/bin/sh

spam=$HOME/spam

echo "learning spam"
/usr/bin/sa-learn --spam --mbox $spam

echo "removing $spam"
rm $spam
==========================================


"T. V. Raman" <tvraman@us.ibm.com> writes:

> Hi --
> Does anyone have the necessary elisp binding between vm and sa-learn
> (from spamassassin)?
> There is a sa-learn.el posted to gnu.emacs.sources that is rmail
> specific, wondering if someone has vm-enabled it before I go do it.
>
> -- 
> Best Regards,
> --raman
> ------------------------------------------------------------
> T. V. Raman:  PhD (Cornell University)
> IBM Research: Human Language Technologies
> Architect:    Conversational And Multimodal WWW Standards
> Phone:        1 (408) 927 2608   T-Line 457-2608
> Fax:        1 (408) 927 3012     Cell: 1 650 799 5724
> Email:        tvraman@us.ibm.com
> WWW:      http://www.cs.cornell.edu/home/raman
> AIM:      TVRaman
> PGP:          http://emacspeak.sf.net/raman.asc
> Snail:        IBM Almaden Research Center,
>               650 Harry Road
>               San Jose 95120

-- 
Patrick J. Finerty, Jr., Ph.D.
Forman-Kay Laboratory
Hospital for Sick Children
Toronto, ON, Canada
http://pjf.net/pjf
Technical Details
Message-ID: <3jof2yqx1e.fsf@zifi-home.pjf.org>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!cyclone.bc.net!snoopy.risq.qc.ca!nf3.bellglobal.com!nf1.bellglobal.com!nf2.bellglobal.com!news20.bellglobal.com.POSTED!not-for-mail
References: <16032.13217.373314.422508@bubbles.almaden.ibm.com>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f6829,81426056a56b1af0
X-Google-Attributes: gidf6829,public
X-Google-ArrivalTime: 2003-04-22 10:24:28 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!cyclone.bc.net!snoopy.risq.qc.ca!nf3.bellglobal.com!nf1.bellglobal.com!nf2.bellglobal.com!news20.bellglobal.com.POSTED!not-for-mail
Newsgroups: gnu.emacs.vm.bug
Subject: Re: feature request: sa-learn and vm?
Keywords: spamassassin vm spam mail sa-learn
From: pjf <pjf@pjf.net>
X-URL: http://pjf.net
X-Face: &dh1aHu*v\s24A9~2qU[ln~;(Cz#X]d2r-@X>#j9U@vx!<WO>v8%IYU''n-H1D)}U(-0Te~
 LD|Cyg6Gh-aFN{B*</{g_\s>VSKhs}en{nXo3xkveE#BxR9<pA`zlHHt{n(k7D[)W1/MVRsB5
Message-ID: <3jof2yqx1e.fsf@zifi-home.pjf.org>
User-Agent: Gnus/5.090012 (Oort Gnus v0.12) XEmacs/21.4 (Portable Code,
 i686-pc-linux)
References: <16032.13217.373314.422508@bubbles.almaden.ibm.com>
Cancel-Lock: sha1:UQgBcWd6o5V8iDUAa1v/Dm+J6Ks=
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Lines: 61
Date: Tue, 22 Apr 2003 13:09:17 -0400
NNTP-Posting-Host: 64.229.8.69
X-Complaints-To: abuse@sympatico.ca
X-Trace: news20.bellglobal.com 1051031356 64.229.8.69 (Tue, 22 Apr 2003 13:09:16 EDT)
NNTP-Posting-Date: Tue, 22 Apr 2003 13:09:16 EDT
Organization: Bell Sympatico