|
Tim Waugh |
68df61 |
diff -up a2ps-4.13/sheets/perl.ssh.perl a2ps-4.13/sheets/perl.ssh
|
|
Tim Waugh |
68df61 |
--- a2ps-4.13/sheets/perl.ssh.perl 2007-09-26 10:30:43.000000000 +0100
|
|
Tim Waugh |
68df61 |
+++ a2ps-4.13/sheets/perl.ssh 2007-09-26 10:47:47.000000000 +0100
|
|
Tim Waugh |
68df61 |
@@ -106,9 +106,9 @@ operators are
|
|
Tim Waugh |
68df61 |
(/(s|tr)/ # 1. The command: `tr' or `s'
|
|
Tim Waugh |
68df61 |
/(([[:punct:]])/ # 2. The delimiter
|
|
Tim Waugh |
68df61 |
/(/ # 3. The *two* regexps
|
|
Tim Waugh |
68df61 |
- /(.|\\\\.)*/ # First regexp
|
|
Tim Waugh |
68df61 |
+ /(\\\\.)*/ # First regexp
|
|
Tim Waugh |
68df61 |
/\\3/ # Separator
|
|
Tim Waugh |
68df61 |
- /(.|\\\\.)*/ # Second Regexp
|
|
Tim Waugh |
68df61 |
+ /(\\\\.)*/ # Second Regexp
|
|
Tim Waugh |
68df61 |
/)/ #
|
|
Tim Waugh |
68df61 |
/\\3)/ # Closer
|
|
Tim Waugh |
68df61 |
\1 Keyword_strong, \2 Plain),
|