• Open Menu Close Menu
  • Apple
  • Shopping Bag
  • Apple
  • Mac
  • iPad
  • iPhone
  • Watch
  • TV
  • Music
  • Support
  • Search apple.com
  • Shopping Bag

Lists

Open Menu Close Menu
  • Terms and Conditions
  • Lists hosted on this site
  • Email the Postmaster
  • Tips for posting to public mailing lists
Re: Eudora users - Did you know that...
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Eudora users - Did you know that...


  • Subject: Re: Eudora users - Did you know that...
  • From: John Delacour <email@hidden>
  • Date: Thu, 20 Mar 2003 18:26:09 +0000
  • Mac-eudora-version: 6.0a11

At 5:52 pm +0000 20/3/03, Nigel Smith wrote:

It would appear that the TidBits team have managed to create a more
up-to-date list of settings than the Eudora support staff are able to

I'll mention it to three people and with a bit of luck one of them will have some influence over the QC man that does the site.

If you get this file:
<http://www.bd8.com/eudora/x-eudora-settings.txt.bin>
and put it in the path indicated below, you can create a toolbar button to run this script that will enable you to do an automatic search of the file by string or regular expression. I haven't tested the script to death, so please report any glitches.

The pathname below presumes you have Eudora.app in the default location.

JD



(* Toolbar button script to search for geek strings *)
set XEStxt to "/Applications/Eudora.app/Contents/MacOS/"
set XEStxt to XEStxt & "Eudora Stuff/x-eudora-settings.txt"
set f to "/tmp/junk.txt"
set ppt to "
Search 'x-eudora-settings.txt' for ..."
set dd to display dialog ppt default answer "" with icon 1001
set s to dd's text returned
do shell script "perl -e '$searchstring = qq~" & s & "~;
$fout = qq~" & f & "~ ;
$f = q~" & XEStxt & "~ ;
$error = qq~$/Can\\047t find file $f$/$/~ ;
sysopen F, $f, O_RDONLY ;
sysread F, $_, 1000 ;
$/ = /(\\015\\012|\\015|\\012)/ ? $1: qq~\\n~;
open F, $f or die $error;
open FOUT, qq~>$fout~ ;
$s = 0 ;
print FOUT qq~Key COMMAND-D to delete$/$/~ ;
for (<F>) {
/$searchstring/i and print FOUT qq~$_$/~ ;
}'"
set s to read POSIX file f
if s is "" then return
tell application "Eudora"
activate
make message at end of mailbox 2
set body of message "" to s
end tell
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives: http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.

References: 
 >Re: Eudora users - Did you know that... (From: Nigel Smith <email@hidden>)

  • Prev by Date: Re: Eudora users - Did you know that...
  • Next by Date: Re: Eudora users - Did you know that...
  • Previous by thread: Re: Eudora users - Did you know that...
  • Next by thread: Re: Eudora users - Did you know that...
  • Index(es):
    • Date
    • Thread