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.

diff --git a/gobject/ChangeLog b/gobject/ChangeLog
index 76de021..de0aa02 100644 (file)
--- 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 fc6588e..4efcb30 100755 (executable)
--- 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 fc6588e..4efcb30 100755 (executable)
--- 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";
 }