[glibmm] Fixed a stupid scoping mistake in GtkDefs.pm.



commit 4bf5ae4a116f40d2309906a26765231e2c428a65
Author: Krzesimir Nowak <qdlacz gmail com>
Date:   Thu Jan 6 11:29:01 2011 +0100

    Fixed a stupid scoping mistake in GtkDefs.pm.

 tools/pm/GtkDefs.pm |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)
---
diff --git a/tools/pm/GtkDefs.pm b/tools/pm/GtkDefs.pm
index 978a848..b5a3fe1 100644
--- a/tools/pm/GtkDefs.pm
+++ b/tools/pm/GtkDefs.pm
@@ -382,14 +382,14 @@ sub get_unwrapped
     # this may not work if parent is from other library (GtkApplication's parent
     # is GApplication, so all its properties will be marked as unwrapped)
     my $detailed = 0;
-    my $object = $GtkDefs::objects{$class};
+    my $parent = undef;
     if (exists $GtkDefs::objects{$class})
     {
       my $object = $GtkDefs::objects{$class};
 
       if (defined $object)
       {
-        my $parent = $object->{parent};
+        $parent = $object->{parent};
 
         # may be empty for some classes deriving a GInterface?
         if ($parent)
@@ -400,7 +400,7 @@ sub get_unwrapped
     }
     if ($detailed)
     {
-      push @unwrapped, grep {$$_{class} eq $class && $$_{mark}==0 && not exists $GtkDefs::properties{$object->{parent} . '::' . $_->{name}}} values %GtkDefs::properties;
+      push @unwrapped, grep {$$_{class} eq $class && $$_{mark}==0 && not exists $GtkDefs::properties{$parent . '::' . $_->{name}}} values %GtkDefs::properties;
     }
     else
     {



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]