From 3282be229999dc36c197b264d63063a18d136331 Mon Sep 17 00:00:00 2001
From: Andreas Brachold <vdr07@deltab.de>
Date: Sun, 11 Nov 2007 06:55:13 +0000
Subject: * Update installation list with required modules * Remove
 unused/doubled provided external perl moduls

---
 lib/GD/Graph/utils.pm | 49 -------------------------------------------------
 1 file changed, 49 deletions(-)
 delete mode 100644 lib/GD/Graph/utils.pm

(limited to 'lib/GD/Graph/utils.pm')

diff --git a/lib/GD/Graph/utils.pm b/lib/GD/Graph/utils.pm
deleted file mode 100644
index b24fc26..0000000
--- a/lib/GD/Graph/utils.pm
+++ /dev/null
@@ -1,49 +0,0 @@
-#==========================================================================
-#              Copyright (c) 1995-1999 Martien Verbruggen
-#--------------------------------------------------------------------------
-#
-#   Name:
-#       GD::Graph::utils.pm
-#
-#   Description:
-#       Package of general utilities.
-#
-# $Id: utils.pm,v 1.7 2003/02/10 22:12:41 mgjv Exp $
-#
-#==========================================================================
- 
-package GD::Graph::utils;
-
-($GD::Graph::utils::VERSION) = '$Revision: 1.7 $' =~ /\s([\d.]+)/;
-
-use strict;
-
-use vars qw( @EXPORT_OK %EXPORT_TAGS );
-require Exporter;
-
-@GD::Graph::utils::ISA = qw( Exporter );
- 
-@EXPORT_OK = qw(_max _min _round);
-%EXPORT_TAGS = (all => [qw(_max _min _round)]);
-
-sub _max { 
-    my ($a, $b) = @_; 
-    return undef    if (!defined($a) and !defined($b));
-    return $a       if (!defined($b));
-    return $b       if (!defined($a));
-    ( $a >= $b ) ? $a : $b; 
-}
-
-sub _min { 
-    my ($a, $b) = @_; 
-    return undef    if (!defined($a) and !defined($b));
-    return $a       if (!defined($b));
-    return $b       if (!defined($a));
-    ( $a <= $b ) ? $a : $b; 
-}
-
-sub _round { sprintf "%.0f", shift }
-
-sub version { $GD::Graph::utils::VERSION }
-
-"Just another true value";
-- 
cgit v1.2.3