diff options
| author | Tim Janik <timj@gtk.org> | 2001-04-30 17:59:47 +0000 |
|---|---|---|
| committer | Tim Janik <timj@src.gnome.org> | 2001-04-30 17:59:47 +0000 |
| commit | 1ffd953c396b85a46f3ccc19e76901f7b0c7d43f (patch) | |
| tree | 464e447a082b36deacfdc9b75c800bb8c4a92686 /gobject | |
| parent | abc5cbbe3e1f6e6bdc40d94741713e9efb6d580d (diff) | |
removed \v escaping, newer perl versions don't support this, and it'S
Mon Apr 30 20:03:56 2001 Tim Janik <timj@gtk.org>
* glib-mkenums (usage): removed \v escaping, newer perl versions don't
support this, and it'S probably useless anyways.
Diffstat (limited to 'gobject')
| -rw-r--r-- | gobject/ChangeLog | 5 | ||||
| -rwxr-xr-x | gobject/glib-mkenums | 14 | ||||
| -rwxr-xr-x | gobject/glib-mkenums.in | 14 |
3 files changed, 19 insertions, 14 deletions
diff --git a/gobject/ChangeLog b/gobject/ChangeLog index 76de021ba..de0aa0271 100644 --- a/gobject/ChangeLog +++ b/gobject/ChangeLog @@ -1,3 +1,8 @@ +Mon Apr 30 20:03:56 2001 Tim Janik <timj@gtk.org> + + * glib-mkenums (usage): removed \v escaping, newer perl versions don't + support this, and it'S probably useless anyways. + Sat Apr 28 23:39:42 2001 Tim Janik <timj@gtk.org> * gsignal.[hc]: made signal handler and emission hook ids gulongs. diff --git a/gobject/glib-mkenums b/gobject/glib-mkenums index fc6588ead..4efcb3031 100755 --- a/gobject/glib-mkenums +++ b/gobject/glib-mkenums @@ -187,7 +187,7 @@ if (length($fhead)) { $prod =~ s/\@filename\@/$ARGV/g; $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -306,7 +306,7 @@ while (<>) { $prod =~ s/\@filename\@/$ARGV/g; $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -323,7 +323,7 @@ while (<>) { if ($flags) { $prod =~ s/\@Type\@/Flags/g; } else { $prod =~ s/\@Type\@/Enum/g; } if ($flags) { $prod =~ s/\@TYPE\@/FLAGS/g; } else { $prod =~ s/\@TYPE\@/ENUM/g; } $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -339,7 +339,7 @@ while (<>) { if ($flags) { $prod =~ s/\@Type\@/Flags/g; } else { $prod =~ s/\@Type\@/Enum/g; } if ($flags) { $prod =~ s/\@TYPE\@/FLAGS/g; } else { $prod =~ s/\@TYPE\@/ENUM/g; } $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -348,7 +348,7 @@ while (<>) { my $prod = $vprod; $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; for (@entries) { my ($name,$nick) = @{$_}; my $tmp_prod = $vprod; @@ -374,7 +374,7 @@ while (<>) { if ($flags) { $prod =~ s/\@Type\@/Flags/g; } else { $prod =~ s/\@Type\@/Enum/g; } if ($flags) { $prod =~ s/\@TYPE\@/FLAGS/g; } else { $prod =~ s/\@TYPE\@/ENUM/g; } $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -386,7 +386,7 @@ if (length($ftail)) { $prod =~ s/\@filename\@/$ARGV/g; $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } diff --git a/gobject/glib-mkenums.in b/gobject/glib-mkenums.in index fc6588ead..4efcb3031 100755 --- a/gobject/glib-mkenums.in +++ b/gobject/glib-mkenums.in @@ -187,7 +187,7 @@ if (length($fhead)) { $prod =~ s/\@filename\@/$ARGV/g; $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -306,7 +306,7 @@ while (<>) { $prod =~ s/\@filename\@/$ARGV/g; $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -323,7 +323,7 @@ while (<>) { if ($flags) { $prod =~ s/\@Type\@/Flags/g; } else { $prod =~ s/\@Type\@/Enum/g; } if ($flags) { $prod =~ s/\@TYPE\@/FLAGS/g; } else { $prod =~ s/\@TYPE\@/ENUM/g; } $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -339,7 +339,7 @@ while (<>) { if ($flags) { $prod =~ s/\@Type\@/Flags/g; } else { $prod =~ s/\@Type\@/Enum/g; } if ($flags) { $prod =~ s/\@TYPE\@/FLAGS/g; } else { $prod =~ s/\@TYPE\@/ENUM/g; } $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -348,7 +348,7 @@ while (<>) { my $prod = $vprod; $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; for (@entries) { my ($name,$nick) = @{$_}; my $tmp_prod = $vprod; @@ -374,7 +374,7 @@ while (<>) { if ($flags) { $prod =~ s/\@Type\@/Flags/g; } else { $prod =~ s/\@Type\@/Enum/g; } if ($flags) { $prod =~ s/\@TYPE\@/FLAGS/g; } else { $prod =~ s/\@TYPE\@/ENUM/g; } $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } @@ -386,7 +386,7 @@ if (length($ftail)) { $prod =~ s/\@filename\@/$ARGV/g; $prod =~ s/\\a/\a/g; $prod =~ s/\\b/\b/g; $prod =~ s/\\t/\t/g; $prod =~ s/\\n/\n/g; - $prod =~ s/\\v/\v/g; $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; + $prod =~ s/\\f/\f/g; $prod =~ s/\\r/\r/g; print "$prod\n"; } |