blob: af4ba8666d03a2343b024d519905ce092aa3dde8 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
|
--- iconv_builtin 2000/12/01 10:15:21 1.1
+++ iconv_builtin 2000/12/01 10:15:46
@@ -83,7 +83,7 @@
%builtins = map { $pic = 1 if $_ eq 'PIC'; $_ => $pic } @ARGV;
while (<STDIN>) {
- unless (/^([^[:space:]#]+)/) {
+ unless (/^([^\s#]+)/) {
# line continuation or comment
print $_ unless $opt_s || !$opt_n || /^#WARNING/;
next;
|
