From dlm@shivafs.cac.washington.edu Wed Aug 24 09:26:18 1994 Date: Tue, 10 Feb 95 15:40:48 -0800 From: The Pine Development Team Subject: How do I "paste" an address from the addressbook into the text of a message? Status: RO X-Status: Pine does not currently support this directly, but here is a work-around: 1. Move the cursor to the Cc: line. 2. Enter the nickname or press Ctrl-T to search the addressbook and select the entry. 3. Use Ctrl-K to delete that address from the Cc: line. 4. Move the cursor where you want it in the body of the message. 5. Press Ctrl-U to insert the address. This is a round-about way to get the job done, but it works... From dlm@shivafs.cac.washington.edu Wed Aug 24 09:26:18 1994 Date: Tue, 10 Feb 95 15:40:48 -0800 From: The Pine Development Team Subject: How do I convert Berkeley Mail aliases to Pine Addressbook? Status: RO X-Status: The Pine source distribution includes a shell script to do this in the contrib/utils directory. It is called brk2pine.sh. From dlm@shivafs.cac.washington.edu Wed Aug 24 09:26:18 1994 Date: Tue, 10 Feb 95 15:40:48 -0800 From: Klaus Wacker Subject: How do I convert Elm aliases to Pine Addressbook? Mime-version: 1.0 Content-Type: MULTIPART/MIXED; BOUNDARY="+++++" Status: RO X-Status: --+++++ Content-Description: How do I convert Elm aliases to Pine Addressbook? I wrote my own perl script, which I claim digests everything elm accepts and converts it into something pine accepts. Please tell me if you find otherwise. I intend to use this script regularly to keep system-wide aliases and addressbooks in synch. It is archived at: http://www.Physik.Uni-Dortmund.DE/wacker/elm-to-pine A copy is below. --+++++ Content-Description: elm-to-pine: Convert elm aliases file to Pine Addressbook Content-Type: TEXT/PLAIN; charset=US-ASCII; name="elm-to-pine" #!/usr/local/bin/perl # # elm-to-pine: Convert elm aliases file to pine address book # Author: Klaus Wacker (wacker@Physik.Uni-Dortmund.DE) # # Usage e.g. # elm-to-pine ~/.elm/aliases.text >~/.addressbook # # get a line, combining continuation lines # that start with whitespace # (taken from the perl man page and modified) sub get_line { return 0 if eof(); $thisline = $lookahead; line: while ($lookahead = <>) { if ($lookahead =~ /^[ \t]/) { $thisline .= $lookahead; } else { last line; } } $thisline; } $lookahead = <>; # get first line while ($_ = do get_line()) { next if /^\#/; # Skip comments chop; s/\t/ /g; # Lets not get confused by any tabs in the file ($nicks,$name,$address)=split(/ *= */,$_,3); @nick=split(/ *, */,$nicks); ($fullname,$remark)=split(/ *, */,$name,2); $fullname =~ s/;/,/; # Lastname[;,] Firstname if ($address =~ /,/ ) {$address="(".$address.")";} # Its a list foreach $nicki (@nick) { # Pine doesn't allow multiple nicknames printf "%s\t%s\t%s\t\t%s\n", $nicki, $fullname, $address, $remark; $address = $nick[0]; # Let additional nicks point to the first one } } --+++++--