diff options
author | José Alburquerque <jaalburqu@svn.gnome.org> | 2011-06-05 15:42:39 -0400 |
---|---|---|
committer | José Alburquerque <jaalburqu@svn.gnome.org> | 2011-06-05 21:26:02 -0400 |
commit | 99760a5fafb3814828f1ecfb826d50e0f5aa48d6 (patch) | |
tree | 26f993c35955d6996304240b7eae46807bbbca7e /tools/pm/Property.pm | |
parent | 018b7fb5cecdd109985d63534b83d62faf2dc626 (diff) | |
download | glibmm-99760a5fafb3814828f1ecfb826d50e0f5aa48d6.tar.gz |
tools: Recursive whitespace cleanup in folder.
Diffstat (limited to 'tools/pm/Property.pm')
-rw-r--r-- | tools/pm/Property.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tools/pm/Property.pm b/tools/pm/Property.pm index 80f21bbb..a0e97596 100644 --- a/tools/pm/Property.pm +++ b/tools/pm/Property.pm @@ -47,7 +47,7 @@ sub new $$self{writable} = ($1 eq "#t") if ($def =~ s/\(writable (\S+)\)//); $$self{construct_only} = ($1 eq "#t") if ($def =~ s/\(construct-only (\S+)\)//); $$self{entity_type} = 'property'; - + # Property documentation: my $propertydocs = $1 if ($def =~ s/\(docs "([^"]*)"\)//); # Add a full-stop if there is not one already: @@ -62,9 +62,9 @@ sub new } } } - + $$self{docs} = $propertydocs; - + $$self{name} =~ s/-/_/g; # change - to _ |