Add POD for Macro::quote

This commit is contained in:
Colin Kuskie 2010-08-26 14:41:36 -07:00
parent 0b5d4e4614
commit 05b899db69

View file

@ -257,6 +257,16 @@ sub _transformMacro {
});
}
=head2 quote ($text)
Escape backslashes and single quotes, and then return the text wrapped in single quotes.
=head3 $text
Text to quote.
=cut
sub quote {
my $text = shift;
$text =~ s/([\\'])/\\$1/g;