[libglib-perl] 03/05: debian/patches/fix-gtks-whatis: adjust "if" to match upstream code's style.

[Intrigeri]

This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to branch master
in repository libglib-perl.

commit c5ac613a90ee1080dd4aa6b788d5d4c95657b56d
Author: intrigeri <intrigeri at boum.org>
Date:   Mon Aug 10 12:29:18 2015 +0000

    debian/patches/fix-gtks-whatis: adjust "if" to match upstream code's style.
---
 debian/patches/fix-gtks-whatis | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/debian/patches/fix-gtks-whatis b/debian/patches/fix-gtks-whatis
index 52d6332..7ca8573 100644
--- a/debian/patches/fix-gtks-whatis
+++ b/debian/patches/fix-gtks-whatis
@@ -12,14 +12,14 @@ Author: Ryan Niebur <ryan at debian.org>
  
  		print "=head1 NAME\n\n$package";
 -		print ' - '.$pkgdata->{blurb} if (exists ($pkgdata->{blurb}));
-+		if(exists ($pkgdata->{blurb})) {
++		if (exists ($pkgdata->{blurb})) {
 +			print ' - '.$pkgdata->{blurb};
-+		} elsif($package =~ m/^Gtk2::Pango/) {
++		} elsif ($package =~ m/^Gtk2::Pango/) {
 +			my $newname = $package;
 +			$newname =~ s/Gtk2:://;
 +			print ' - moved to ' . $newname
 +			    . ', kept for backwards compatibility'
-+		} elsif(convert_to_cname($package)) {
++		} elsif (convert_to_cname($package)) {
 +			print ' - wrapper for '.convert_to_cname($package);
 +		}
  		print "\n\n=cut\n\n";
@@ -32,19 +32,19 @@ Author: Ryan Niebur <ryan at debian.org>
 +sub convert_to_cname {
 +	my $perlname = shift;
 +	my $cname = $perlname;
-+	if($perlname =~ /^Gtk2::Gdk::/) {
++	if ($perlname =~ /^Gtk2::Gdk::/) {
 +		$cname =~ s/^Gtk2::Gdk::/Gdk/;
-+	} elsif($perlname =~ m/^Gtk2::/) {
++	} elsif ($perlname =~ m/^Gtk2::/) {
 +		$cname =~ s/^Gtk2::/Gtk/;
-+	} elsif($perlname =~ m/^Gnome2::Bonobo::/) {
++	} elsif ($perlname =~ m/^Gnome2::Bonobo::/) {
 +		$cname =~ s/^Gnome2::Bonobo::/Bonobo/;
-+	} elsif($perlname =~ m/^Gnome2::/) {
++	} elsif ($perlname =~ m/^Gnome2::/) {
 +		$cname =~ s/^Gnome2::/Gnome/;
 +	}
 +	$cname =~ s/:://g;
 +	my $tmp;
 +	eval { $tmp = Glib::Type->package_from_cname($cname); };
-+	if($@ || $tmp ne $perlname) {
++	if ($@ || $tmp ne $perlname) {
 +		return;
 +	}
 +	return $cname;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libglib-perl.git