← Back to branch summary

~ubuntu-branches/ubuntu/trusty/libchart-gnuplot-perl/trusty

« back to all changes in this revision

Viewing changes to lib/Chart/Gnuplot.pm

  • Committer: Bazaar Package Importer
  • Author(s): gregor herrmann, Ansgar Burchardt, Salvatore Bonaccorso, gregor herrmann
  • Date: 2011-09-17 18:17:44 UTC
  • mfrom: (1.2.4 upstream) (3.1.7 sid)
  • Revision ID: james.westby@ubuntu.com-20110917181744-rx1p4pcav89anno1
Tags: 0.17-1
[ Ansgar Burchardt ]
* debian/control: Convert Vcs-* fields to Git.

[ Salvatore Bonaccorso ]
* debian/copyright: Replace DEP5 Format-Specification URL from
  svn.debian.org to anonscm.debian.org URL.

[ gregor herrmann ]
* New upstream release.
* Bump debhelper compatibility level to 8.
* Add /me to Uploaders.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/Chart/Gnuplot.pm
4
4
use Carp;
5
5
use File::Copy qw(move);
6
6
use File::Temp qw(tempdir);
7
 
use Chart::Gnuplot::Util qw(_lineType _pointType _copy);
8
 
$VERSION = '0.16';
 
7
use Chart::Gnuplot::Util qw(_lineType _pointType _borderCode _copy);
 
8
$VERSION = '0.17';
9
9
 
10
10
# Constructor
11
11
sub new
390
390
            if (ref($self->{$attr}) eq 'ARRAY')
391
391
            {
392
392
                # Deal with ranges from array reference
393
 
                if (defined $self->{timeaxis})
 
393
                if (defined $self->{timeaxis} &&
 
394
                    $self->{timeaxis} =~ /(^|,)\s*$1\s*(,|$)/)
394
395
                {
 
396
                    # $1-axis is a time axis
395
397
                    print PLT "set $attr ['".join("':'", @{$self->{$attr}}).
396
398
                        "']\n";
397
399
                }
447
449
        {
448
450
            if (defined $self->{border})
449
451
            {
450
 
                print PLT "set border".&_setBorder($self->{border})."\n";
 
452
                print PLT "set border";
 
453
                print PLT " ".&_borderCode($self->{border}->{sides}) if
 
454
                    (defined $self->{border}->{sides});
 
455
                print PLT &_setBorder($self->{border})."\n";
451
456
                push(@sets, 'border');
452
457
            }
453
458
            else
2138
2143
 
2139
2144
=head3 border
2140
2145
 
2141
 
Border of the graph. Properties supported are "linetype", "width", and "color".
2142
 
E.g.
 
2146
Border of the graph. Properties supported are "sides", "linetype", "width", and
 
2147
"color". E.g.
2143
2148
 
2144
2149
    border => {
 
2150
        sides    => "bottom, left",
2145
2151
        linetype => 3,
2146
2152
        width    => 2,
2147
2153
        color    => '#ff00ff',
2148
2154
    }
2149
2155
 
 
2156
C<sides> tells which side(s) will be displayed. Default is all four borders for
 
2157
2D plots, and four bottom and left vertial borders for 3D plots. Acceptable
 
2158
valurs are the 12-bit code (see the Gnuplot manual) or the following names:
 
2159
 
 
2160
    bottom
 
2161
    left
 
2162
    top
 
2163
    right
 
2164
    bottom left front
 
2165
    bottom left back
 
2166
    bottom right front
 
2167
    bottom right back
 
2168
    left vertical
 
2169
    right vertical
 
2170
    front vertical
 
2171
    back vertical
 
2172
    top left front
 
2173
    top left back
 
2174
    top right front
 
2175
    top right back
 
2176
 
2150
2177
If you set this to C<undef>. E.g.,
2151
2178
 
2152
2179
    border => undef
2837
2864
 
2838
2865
=back
2839
2866
 
2840
 
=head1 FUTURE PLAN
 
2867
=head1 WISH LIST
2841
2868
 
2842
2869
=over
2843
2870