>#!perl -w > >use Mac::Processes; >use Mac::Events; > >$bbedit = GetFrontProcess; >$macperl = GetCurrentProcess; >SetFrontProcess $macperl; >WaitNextEvent; > >if(MacPerl::Answer("Should I insert Russian hyphenation?", "Yes", >"No!")) {print "hyphenation";} >else {print "No hyphenation";} > >SetFrontProcess $bbedit; >WaitNextEvent; Works perfectly! Thank you guys! /Peder Peder Axensten mailto:f95-pax@nada.kth.se (Umea, Sweden) # ===== Want to unsubscribe from this list? # ===== Send mail with body "unsubscribe" to macperl-request@macperl.org