From cd05882a447564d3493288b1d873d730b1247a5d Mon Sep 17 00:00:00 2001 From: Toni Gundogdu Date: Tue, 30 Aug 2011 13:45:40 +0300 Subject: [PATCH] remove print_version subr --- bin/umph | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/bin/umph b/bin/umph index aa03e26..115a03e 100755 --- a/bin/umph +++ b/bin/umph @@ -48,7 +48,7 @@ sub init 'proxy=s', 'no_proxy|no-proxy', 'quiet|q', - 'version' => \&print_version, + 'version' => sub {print "umph version $VERSION\n"; exit 0}, 'license' => \&print_license, 'help' => \&print_help, ) or exit 1; @@ -58,12 +58,6 @@ sub init $config{max_results} ||= 25; # Default 25. } -sub print_version -{ - print "umph version $VERSION\n"; - exit 0; -} - sub print_license { print "# Copyright (C) 2010-2011 Toni Gundogdu. @@ -97,7 +91,7 @@ sub main { init(); print_help if scalar @ARGV == 0; - spew_qe("Checking ..."); + spew_qe("Checking ... "); require LWP; my $a = new LWP::UserAgent; -- 2.11.4.GIT