At 11:32 AM -0400 6/6/97, Chris Nandor wrote: > It seems that the output to a MacPerl window for STDOUT/STDERR only >works > with Perl Filters. For instance, Check Syntax created a new window on > failure (though it did bring up an error browser, which is >ultra-cool). I > would prefer to have all STDERR/STDOUT directed to one MacPerl window, > except for Perl Filters STDOUT, which I would want directed back into >the > original window. Yes, the new extensions are really cool. I have quite the same problem: I don't get the error browser. It seems that the ``Use error browser'' option and the ``Output to MacPerl window'' option don't ``cohabit'' (as we say in French;-) very well. I managed to get the error browser window once before setting the output to the MacPerl window. Also, I haven't found how to have additional extensions show up in the palette, although I carefully followed the instructions to create new extensions. > But other than that, I love the improvements ... when I get my 17" >monitor > next week I'll use the palette a lot more ... :-) I have just finished an AS script to reorganize my windows. It is designed for 640x480 screens. The main window (for scripts) shows 80 columns and 23 lines (assuming you are using ProFont 9 pts). The MacPerl window shows 87 columns and 9 lines. People with larger screens (or Chris when he'll have his new 17'' monitor) should change bottomBound to the height of their screen - 5 (otherwise the window will be resized) and middleBound to whatever they want. Have fun. set leftBound to 0 set rightBound to leftBound + 550 set topBound to 38 set bottomBound to 475 set middleBound to 345 tell application "BBEdit 4.0" repeat with i from 1 to (count every window) tell window i if window kind is Editing Window then if (name ends with ".pl") or (name ends with ".pm") then if bounds {leftBound, topBound, rightBound, middleBound} then set bounds to {leftBound, topBound, rightBound, middleBound} if cursor position true then set cursor position to true if line numbers true then set line numbers to true if philip bar true then set philip bar to true if status bar true then set status bar to true if tab stops true then set tab stops to true --if show invisibles true then set show invisibles to true if show spaces false then set show spaces to false if auto indent true then set auto indent to true if soft wrapping false then set soft wrapping to false if auto balance true then set auto balance to true if smart quotes false then set smart quotes to false else if name = "MacPerl" then if bounds {leftBound, middleBound + 4, rightBound, bottomBound} then set bounds to {leftBound, middleBound + 4, rightBound, bottomBound} if cursor position true then set cursor position to true if line numbers false then set line numbers to false if status bar false then set status bar to false if tab stops true then set tab stops to true if show invisibles false then set show invisibles to false if show spaces false then set show spaces to false if soft wrapping false then set soft wrapping to false end if end if end tell end repeat end tell -- Nicolas LE CLERC <mailto:nleclerc@pobox.com> <finger:nleclerc@pobox.com> ***** Want to unsubscribe from this list? ***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch