[comp.misc] RN macros revisited

odin@ucscb.UCSC.EDU (Jon Granrose) (04/12/90)

These are the RN macros which I have received since my request that people
send me their useful macros.  Some of these I use every day, others I hardly
ever use.  This also gives another example of how to use different .sig files
for different newsgroups.  I am still looking for interesting or even
uninteresting rn macros.  I am still trying to get a good grip on the whole
thing so any macros are interesting to me so mail me anything, I'm interested.

Thanks,

Jon

--

# Define @=, in article selection mode (a) and pager mode (p), to show
# subject lines (=) of all preceding messages (?.?), including ones which 
# have already been read (r).  Macro definition ends in \012 (newline)
# so the user doesn't have to hit return.
# Usage:  @=
@= %(%m=[ap]??.?r=\012)

# Define @mail, in article selection mode (a) and pager mode (p) to mail 
# the current message, with its subject line (%s) as subject, to the 
# specified user via Unix mail.  
# Usage:  @mail <user_name>
@mail %(%m=[ap]?|/usr/ucb/mail -s "%s" )

# Define @unread, in article selection mode (a) and pager mode (p) to mark
# as unread (m) all following articles with the same subject as this one 
# (/%s/).  This is the opposite of the "k" command, which I sometimes use 
# too quickly as I wade through the messages.
# Usage:  @unread
@unread %(%m=[ap]?/%s/m)

# Example of how to get a macro to prompt the user for input.
@prompt %"Filename: "

# find base article with current subject
@base	%(%m=a??\^Subject\: ^(@q^)?rh\n)

# print index of all articles (read AND unread)
@index	%(%m=a?1\n/.*/rh\:=\n^(@r^)%a\n)

# prints index of all articles (read AND unread) with current subject
@csub	%(%m=a?1\n/^(@q^)/rh\:=\n^(@r^)%a\n)

# swap signature files based on current news group
# ibm.* gets .sig.ibm; others get .sig.world
# runs automatically when you follow-up (F or f)
# or reply.
#F      %(%m=a?^(@s^)F)
#f      %(%m=a?^(@s^)f)
#R      %(%m=a?^(@s^)R)
#r      %(%m=a?^(@s^)r)

#@s !cp %~/.sig.%(%`echo %C | awk -F. '{print $1}'`=ibm?ibm:world) %~/.signature\n

# used in other macros..
@q      %`echo "%s" | tr "[/?\[*$^]" .`
@r      %"<CR> to return"
-- 
 _____________________________________________________________________________
|Jon Granrose        |ARPA: odin@ucscb.UCSC.EDU   jonathan@sco.com |  // Only |
|Cowell College, UCSC|odin@pilot.njin.net 74036.3241@compuserve.com|\X/ Amiga!|
|Santa Cruz, CA 95064|UUCP:..!ucbvax!ucscc!ucscb!odin Bitnet:odin@ucscb.bitnet|
|       Please send any Anonymous FTP information to odin@pilot.njin.net      |