diff options
| author | Andreas Brachold <vdr07@deltab.de> | 2007-11-11 06:55:13 +0000 |
|---|---|---|
| committer | Andreas Brachold <vdr07@deltab.de> | 2007-11-11 06:55:13 +0000 |
| commit | 3282be229999dc36c197b264d63063a18d136331 (patch) | |
| tree | 98a42db29d955b39e7bed1b599fdcc56c3a29de9 /lib/GD/Graph/utils.pm | |
| parent | cfdd733c17cfa4f1a43b827a656e9e53cc2524ac (diff) | |
| download | xxv-3282be229999dc36c197b264d63063a18d136331.tar.gz xxv-3282be229999dc36c197b264d63063a18d136331.tar.bz2 | |
* Update installation list with required modules
* Remove unused/doubled provided external perl moduls
Diffstat (limited to 'lib/GD/Graph/utils.pm')
| -rw-r--r-- | lib/GD/Graph/utils.pm | 49 |
1 files changed, 0 insertions, 49 deletions
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"; |
