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 <intrig...@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 <r...@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 <r...@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

_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits

Reply via email to