[PrEditor] Improved 'Comment-out' macro for Perl

[John Young]

Hi,

Here's a new, improved macro for commenting out a number of lines of code in
Perl.  

Currently, when you use the 'Comment-Out' macro (in the Perl menu), only one
line gets commented out.  This new macro allows you to comment-out a number
of line of code at once.  You simple select the lines that you want
commented out, then run the new 'Comment-Out' macro.

To install, simply open the macro (PrEditor's Tools menu | Macros... |
perl\CommentOut | Edit) and replace the old code with this...

macro CommentOut()
{
	TEXTRANGE sel = GetSelection();
	for (int nLine = sel.start.line; nLine <= sel.end.line; nLine++)
	{
		CursorGoto (nLine, 1);
		TypeText ("#");
	}
}

Regards,

-John

-- 
John Young
Thistle Software
www.thistlesoft.com 


-------------- next part --------------
A non-text attachment was scrubbed...
Name: winmail.dat
Type: application/ms-tnef
Size: 2048 bytes
Desc: not available
Url : http://seven.pairlist.net/pipermail/preditor/attachments/20050717/99cf64eb/winmail.bin