Fix constant resolution on 5.8

[perl/modules/rgit.git] / lib / App / Rgit / Repository.pm

diff --git a/lib/App/Rgit/Repository.pm b/lib/App/Rgit/Repository.pm
index bc847408f45fb1a284fee211fea1a01e573d0199..9894a50579409778702c7e97bfdc93de74112dda 100644 (file)
--- a/lib/App/Rgit/Repository.pm
+++ b/lib/App/Rgit/Repository.pm
@@ -179,7 +179,7 @@ sub run {
  if ($WIFSIGNALED->($?)) {
   $sig = $WTERMSIG->($?);
   $conf->warn("git died with signal $sig\n");
  if ($WIFSIGNALED->($?)) {
   $sig = $WTERMSIG->($?);
   $conf->warn("git died with signal $sig\n");

-  if ($sig == POSIX::SIGINT || $sig == POSIX::SIGQUIT) {
+  if ($sig == POSIX::SIGINT() || $sig == POSIX::SIGQUIT()) {

    $conf->err("Aborting\n");
    exit $sig;
   }
    $conf->err("Aborting\n");
    exit $sig;
   }