From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Sun, 18 Sep 2011 19:23:21 +0000 (+0200)
Subject: configure with gnuplot style via parameter
X-Git-Url: http://git.rot13.org/?p=MojoFacets.git;a=commitdiff_plain;h=a74468137d22f926b3f178fbd9dd7033f45b35ab

configure with gnuplot style via parameter
---

diff --git a/lib/MojoFacets/Gnuplot.pm b/lib/MojoFacets/Gnuplot.pm
index 5040e7c..961220b 100644
--- a/lib/MojoFacets/Gnuplot.pm
+++ b/lib/MojoFacets/Gnuplot.pm
@@ -14,6 +14,7 @@ sub index {
 
 	my $columns = $self->session('columns') || return $self->redirect_to('/data/columns');
 	my $path    = $self->session('path')    || return $self->redirect_to('/data/load');
+	my $with    = $self->param('with') || 'points';
 
 #	my $name = join('.', 'items', map { my $n = unac_string($_); $n =~ s/\W+/_/g; $n } @$columns );
 	my $name = MojoFacets::Data::__export_path_name( $path, 'items', @$columns );
@@ -28,7 +29,7 @@ sub index {
 		my @plot;
 		foreach ( 1 .. $#$columns ) {
 			my $n = $_ + 1;
-			push @plot, qq|"$dir/$url" using 1:$n title "$columns->[$_]" with points|;
+			push @plot, qq|"$dir/$url" using 1:$n title "$columns->[$_]" with $with|;
 		}
 
 		my $g = qq|