r46452 - in /trunk/libgraphics-gnuplotif-perl: ./ debian/ t/

segre at users.alioth.debian.org segre at users.alioth.debian.org
Tue Oct 27 05:56:31 UTC 2009


Author: segre
Date: Tue Oct 27 05:56:26 2009
New Revision: 46452

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=46452
Log:
[svn-inject] Applying Debian modifications to trunk

Added:
    trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.1.stderr.log
    trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.2.stderr.log
    trunk/libgraphics-gnuplotif-perl/debian/
    trunk/libgraphics-gnuplotif-perl/debian/changelog
    trunk/libgraphics-gnuplotif-perl/debian/compat
    trunk/libgraphics-gnuplotif-perl/debian/control
    trunk/libgraphics-gnuplotif-perl/debian/copyright
    trunk/libgraphics-gnuplotif-perl/debian/libgraphics-gnuplotif-perl.docs
    trunk/libgraphics-gnuplotif-perl/debian/rules   (with props)
    trunk/libgraphics-gnuplotif-perl/debian/watch
    trunk/libgraphics-gnuplotif-perl/t/function4.gnuplot.ps
    trunk/libgraphics-gnuplotif-perl/t/test2.gnuplot

Added: trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.1.stderr.log
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.1.stderr.log?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.1.stderr.log (added)
+++ trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.1.stderr.log Tue Oct 27 05:56:26 2009
@@ -1,0 +1,1 @@
+

Added: trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.2.stderr.log
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.2.stderr.log?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.2.stderr.log (added)
+++ trunk/libgraphics-gnuplotif-perl/.gnuplot.20450.2.stderr.log Tue Oct 27 05:56:26 2009
@@ -1,0 +1,1 @@
+

Added: trunk/libgraphics-gnuplotif-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/debian/changelog?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/debian/changelog (added)
+++ trunk/libgraphics-gnuplotif-perl/debian/changelog Tue Oct 27 05:56:26 2009
@@ -1,0 +1,5 @@
+libgraphics-gnuplotif-perl (1.5-1) unstable; urgency=low
+
+  * Initial Release (Closes: #552476).
+
+ -- Carlo Segre <segre at debian.org>  Sun, 25 Oct 2009 01:45:28 -0500

Added: trunk/libgraphics-gnuplotif-perl/debian/compat
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/debian/compat?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/debian/compat (added)
+++ trunk/libgraphics-gnuplotif-perl/debian/compat Tue Oct 27 05:56:26 2009
@@ -1,0 +1,1 @@
+7

Added: trunk/libgraphics-gnuplotif-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/debian/control?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/debian/control (added)
+++ trunk/libgraphics-gnuplotif-perl/debian/control Tue Oct 27 05:56:26 2009
@@ -1,0 +1,23 @@
+Source: libgraphics-gnuplotif-perl
+Section: perl
+Priority: optional
+Build-Depends: debhelper (>= 7), perl (>= 5.10) | libmodule-build-perl
+Build-Depends-Indep: perl, perl-modules (>= 5.9.0), xvfb, xauth, 
+ xfonts-base, gnuplot
+Maintainer: Carlo Segre <segre at debian.org>
+Standards-Version: 3.8.3
+Homepage: http://search.cpan.org/dist/Graphics-GnuplotIF/
+
+Package: libgraphics-gnuplotif-perl
+Architecture: all
+Depends: ${perl:Depends}, ${misc:Depends}, perl-modules (>= 5.9.0), gnuplot
+Description: A dynamic Perl interface to gnuplot
+ Graphics::GnuplotIF is a simple and easy to use dynamic Perl interface to
+ gnuplot.  It enables sending display requests asynchronously to gnuplot
+ through simple Perl subroutine calls.
+ .
+ Several independent plots can be started from one script. Each plot has its
+ own pipe. All pipes will be closed automatically by the destructor when the
+ script terminates. The gnuplot processes terminate when the corresponding
+ pipes are closed. Their graphical output will then disappear (but see
+ parameter persist|new).

Added: trunk/libgraphics-gnuplotif-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/debian/copyright?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/debian/copyright (added)
+++ trunk/libgraphics-gnuplotif-perl/debian/copyright Tue Oct 27 05:56:26 2009
@@ -1,0 +1,40 @@
+Format-Specification:
+    http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=196
+Upstream-Maintainer: Dr.-Ing. Fritz Mehner <mehner at fh-swf.de>
+Upstream-Source: http://search.cpan.org/dist/Graphics-GnuplotIF/
+Upstream-Name: Graphics-GnuplotIF
+Disclaimer: This copyright info was automatically extracted 
+    from the perl module. It may not be accurate, so you better 
+    check the module sources in order to ensure the module for its 
+    inclusion in Debian or for general legal information. Please, 
+    if licensing information is incorrectly generated, file a bug 
+    on dh-make-perl.
+
+Files: *
+Copyright: 2005-2008 Dr.-Ing. Fritz Mehner <mehner at fh-swf.de>
+License: Artistic
+    This module is free software; you can redistribute it and/or modify it
+    under the same terms as Perl itself.  
+    On Debian GNU/Linux systems, the complete text of the Artistic License
+    can be found in `/usr/share/common-licenses/Artistic' 
+    This program is distributed in the hope that it will be useful, but
+    WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+Files: debian/*
+Copyright: 2009, Carlo Segre <segre at debian.org>
+License: Artistic | GPL-1+
+
+License: Artistic
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the Artistic License, which comes with Perl.
+    On Debian GNU/Linux systems, the complete text of the Artistic License
+    can be found in `/usr/share/common-licenses/Artistic'
+
+License: GPL-1+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 1, or (at your option)
+    any later version.
+    On Debian GNU/Linux systems, the complete text of the GNU General
+    Public License can be found in `/usr/share/common-licenses/GPL'

Added: trunk/libgraphics-gnuplotif-perl/debian/libgraphics-gnuplotif-perl.docs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/debian/libgraphics-gnuplotif-perl.docs?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/debian/libgraphics-gnuplotif-perl.docs (added)
+++ trunk/libgraphics-gnuplotif-perl/debian/libgraphics-gnuplotif-perl.docs Tue Oct 27 05:56:26 2009
@@ -1,0 +1,1 @@
+README

Added: trunk/libgraphics-gnuplotif-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/debian/rules?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/debian/rules (added)
+++ trunk/libgraphics-gnuplotif-perl/debian/rules Tue Oct 27 05:56:26 2009
@@ -1,0 +1,69 @@
+#!/usr/bin/make -f
+#
+# The following tiny ruiles file will work perfectly on squeeze or later
+# distributions.  The only reason we still are using the old way is for
+# backporting to lenny.
+#
+#%:
+#	dh $@
+#
+#override_dh_auto_test:
+#	xvfb-run dh_auto_test
+
+
+# This debian/rules file is provided as a template for normal perl
+# packages. It was created by Marc Brockschmidt <marc at dch-faq.de> for
+# the Debian Perl Group (http://pkg-perl.alioth.debian.org/) but may
+# be used freely wherever it is useful.
+
+# Uncomment this to turn on verbose mode.
+#export DH_VERBOSE=1
+
+# If set to a true value then MakeMaker's prompt function will
+# always return the default without waiting for user input.
+export PERL_MM_USE_DEFAULT=1
+
+PERL   ?= /usr/bin/perl
+PACKAGE = $(shell dh_listpackages)
+TMP     = $(CURDIR)/debian/$(PACKAGE)
+
+build: build-stamp
+build-stamp:
+	dh_testdir
+	$(PERL) Makefile.PL INSTALLDIRS=vendor
+	$(MAKE)
+	xvfb-run $(MAKE) test
+	touch $@
+
+clean:
+	dh_testdir
+	dh_testroot
+	dh_clean build-stamp install-stamp
+	[ ! -f Makefile ] || $(MAKE) realclean
+
+install: install-stamp
+install-stamp: build-stamp
+	dh_testdir
+	dh_testroot
+	dh_prep
+	$(MAKE) install DESTDIR=$(TMP) PREFIX=/usr
+	touch $@
+
+binary-arch:
+# We have nothing to do here for an architecture-independent package
+
+binary-indep: build install
+	dh_testdir
+	dh_testroot
+	dh_installdocs
+	dh_installchangelogs Changes
+	dh_perl
+	dh_compress
+	dh_fixperms
+	dh_installdeb
+	dh_gencontrol
+	dh_md5sums
+	dh_builddeb
+
+binary: binary-indep binary-arch
+.PHONY: build clean binary-indep binary-arch binary install

Propchange: trunk/libgraphics-gnuplotif-perl/debian/rules
------------------------------------------------------------------------------
    svn:executable = *

Added: trunk/libgraphics-gnuplotif-perl/debian/watch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/debian/watch?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/debian/watch (added)
+++ trunk/libgraphics-gnuplotif-perl/debian/watch Tue Oct 27 05:56:26 2009
@@ -1,0 +1,2 @@
+version=3
+http://search.cpan.org/dist/Graphics-GnuplotIF/   .*/Graphics-GnuplotIF-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$

Added: trunk/libgraphics-gnuplotif-perl/t/function4.gnuplot.ps
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/t/function4.gnuplot.ps?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/t/function4.gnuplot.ps (added)
+++ trunk/libgraphics-gnuplotif-perl/t/function4.gnuplot.ps Tue Oct 27 05:56:26 2009
@@ -1,0 +1,616 @@
+%!PS-Adobe-2.0
+%%Title: t/function4.gnuplot.ps
+%%Creator: gnuplot 4.2 patchlevel 6 
+%%CreationDate: Sun Oct 25 02:08:49 2009
+%%DocumentFonts: (atend)
+%%BoundingBox: 50 50 554 770
+%%Orientation: Landscape
+%%Pages: (atend)
+%%EndComments
+%%BeginProlog
+/gnudict 256 dict def
+gnudict begin
+%
+% The following 6 true/false flags may be edited by hand if required
+% The unit line width may also be changed
+%
+/Color true def
+/Blacktext false def
+/Solid false def
+/Dashlength 1 def
+/Landscape true def
+/Level1 false def
+/Rounded false def
+/TransparentPatterns false def
+/gnulinewidth 5.000 def
+/userlinewidth gnulinewidth def
+%
+/vshift -46 def
+/dl1 {
+  10.0 Dashlength mul mul
+  Rounded { currentlinewidth 0.75 mul sub dup 0 le { pop 0.01 } if } if
+} def
+/dl2 {
+  10.0 Dashlength mul mul
+  Rounded { currentlinewidth 0.75 mul add } if
+} def
+/hpt_ 31.5 def
+/vpt_ 31.5 def
+/hpt hpt_ def
+/vpt vpt_ def
+Level1 {} {
+/SDict 10 dict def
+systemdict /pdfmark known not {
+  userdict /pdfmark systemdict /cleartomark get put
+} if
+SDict begin [
+  /Title (t/function4.gnuplot.ps)
+  /Subject (gnuplot plot)
+  /Creator (gnuplot 4.2 patchlevel 6 )
+  /Author (segre,,,)
+%  /Producer (gnuplot)
+%  /Keywords ()
+  /CreationDate (Sun Oct 25 02:08:49 2009)
+  /DOCINFO pdfmark
+end
+} ifelse
+%
+% Gnuplot Prolog Version 4.2 (August 2006)
+%
+/M {moveto} bind def
+/L {lineto} bind def
+/R {rmoveto} bind def
+/V {rlineto} bind def
+/N {newpath moveto} bind def
+/Z {closepath} bind def
+/C {setrgbcolor} bind def
+/f {rlineto fill} bind def
+/vpt2 vpt 2 mul def
+/hpt2 hpt 2 mul def
+/Lshow {currentpoint stroke M 0 vshift R 
+	Blacktext {gsave 0 setgray show grestore} {show} ifelse} def
+/Rshow {currentpoint stroke M dup stringwidth pop neg vshift R
+	Blacktext {gsave 0 setgray show grestore} {show} ifelse} def
+/Cshow {currentpoint stroke M dup stringwidth pop -2 div vshift R 
+	Blacktext {gsave 0 setgray show grestore} {show} ifelse} def
+/UP {dup vpt_ mul /vpt exch def hpt_ mul /hpt exch def
+  /hpt2 hpt 2 mul def /vpt2 vpt 2 mul def} def
+/DL {Color {setrgbcolor Solid {pop []} if 0 setdash}
+ {pop pop pop 0 setgray Solid {pop []} if 0 setdash} ifelse} def
+/BL {stroke userlinewidth 2 mul setlinewidth
+	Rounded {1 setlinejoin 1 setlinecap} if} def
+/AL {stroke userlinewidth 2 div setlinewidth
+	Rounded {1 setlinejoin 1 setlinecap} if} def
+/UL {dup gnulinewidth mul /userlinewidth exch def
+	dup 1 lt {pop 1} if 10 mul /udl exch def} def
+/PL {stroke userlinewidth setlinewidth
+	Rounded {1 setlinejoin 1 setlinecap} if} def
+% Default Line colors
+/LCw {1 1 1} def
+/LCb {0 0 0} def
+/LCa {0 0 0} def
+/LC0 {1 0 0} def
+/LC1 {0 1 0} def
+/LC2 {0 0 1} def
+/LC3 {1 0 1} def
+/LC4 {0 1 1} def
+/LC5 {1 1 0} def
+/LC6 {0 0 0} def
+/LC7 {1 0.3 0} def
+/LC8 {0.5 0.5 0.5} def
+% Default Line Types
+/LTw {PL [] 1 setgray} def
+/LTb {BL [] LCb DL} def
+/LTa {AL [1 udl mul 2 udl mul] 0 setdash LCa setrgbcolor} def
+/LT0 {PL [] LC0 DL} def
+/LT1 {PL [4 dl1 2 dl2] LC1 DL} def
+/LT2 {PL [2 dl1 3 dl2] LC2 DL} def
+/LT3 {PL [1 dl1 1.5 dl2] LC3 DL} def
+/LT4 {PL [6 dl1 2 dl2 1 dl1 2 dl2] LC4 DL} def
+/LT5 {PL [3 dl1 3 dl2 1 dl1 3 dl2] LC5 DL} def
+/LT6 {PL [2 dl1 2 dl2 2 dl1 6 dl2] LC6 DL} def
+/LT7 {PL [1 dl1 2 dl2 6 dl1 2 dl2 1 dl1 2 dl2] LC7 DL} def
+/LT8 {PL [2 dl1 2 dl2 2 dl1 2 dl2 2 dl1 2 dl2 2 dl1 4 dl2] LC8 DL} def
+/Pnt {stroke [] 0 setdash gsave 1 setlinecap M 0 0 V stroke grestore} def
+/Dia {stroke [] 0 setdash 2 copy vpt add M
+  hpt neg vpt neg V hpt vpt neg V
+  hpt vpt V hpt neg vpt V closepath stroke
+  Pnt} def
+/Pls {stroke [] 0 setdash vpt sub M 0 vpt2 V
+  currentpoint stroke M
+  hpt neg vpt neg R hpt2 0 V stroke
+ } def
+/Box {stroke [] 0 setdash 2 copy exch hpt sub exch vpt add M
+  0 vpt2 neg V hpt2 0 V 0 vpt2 V
+  hpt2 neg 0 V closepath stroke
+  Pnt} def
+/Crs {stroke [] 0 setdash exch hpt sub exch vpt add M
+  hpt2 vpt2 neg V currentpoint stroke M
+  hpt2 neg 0 R hpt2 vpt2 V stroke} def
+/TriU {stroke [] 0 setdash 2 copy vpt 1.12 mul add M
+  hpt neg vpt -1.62 mul V
+  hpt 2 mul 0 V
+  hpt neg vpt 1.62 mul V closepath stroke
+  Pnt} def
+/Star {2 copy Pls Crs} def
+/BoxF {stroke [] 0 setdash exch hpt sub exch vpt add M
+  0 vpt2 neg V hpt2 0 V 0 vpt2 V
+  hpt2 neg 0 V closepath fill} def
+/TriUF {stroke [] 0 setdash vpt 1.12 mul add M
+  hpt neg vpt -1.62 mul V
+  hpt 2 mul 0 V
+  hpt neg vpt 1.62 mul V closepath fill} def
+/TriD {stroke [] 0 setdash 2 copy vpt 1.12 mul sub M
+  hpt neg vpt 1.62 mul V
+  hpt 2 mul 0 V
+  hpt neg vpt -1.62 mul V closepath stroke
+  Pnt} def
+/TriDF {stroke [] 0 setdash vpt 1.12 mul sub M
+  hpt neg vpt 1.62 mul V
+  hpt 2 mul 0 V
+  hpt neg vpt -1.62 mul V closepath fill} def
+/DiaF {stroke [] 0 setdash vpt add M
+  hpt neg vpt neg V hpt vpt neg V
+  hpt vpt V hpt neg vpt V closepath fill} def
+/Pent {stroke [] 0 setdash 2 copy gsave
+  translate 0 hpt M 4 {72 rotate 0 hpt L} repeat
+  closepath stroke grestore Pnt} def
+/PentF {stroke [] 0 setdash gsave
+  translate 0 hpt M 4 {72 rotate 0 hpt L} repeat
+  closepath fill grestore} def
+/Circle {stroke [] 0 setdash 2 copy
+  hpt 0 360 arc stroke Pnt} def
+/CircleF {stroke [] 0 setdash hpt 0 360 arc fill} def
+/C0 {BL [] 0 setdash 2 copy moveto vpt 90 450 arc} bind def
+/C1 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 0 90 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C2 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 90 180 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C3 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 0 180 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C4 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 180 270 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C5 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 0 90 arc
+	2 copy moveto
+	2 copy vpt 180 270 arc closepath fill
+	vpt 0 360 arc} bind def
+/C6 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 90 270 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C7 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 0 270 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C8 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 270 360 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C9 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 270 450 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C10 {BL [] 0 setdash 2 copy 2 copy moveto vpt 270 360 arc closepath fill
+	2 copy moveto
+	2 copy vpt 90 180 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C11 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 0 180 arc closepath fill
+	2 copy moveto
+	2 copy vpt 270 360 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C12 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 180 360 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C13 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 0 90 arc closepath fill
+	2 copy moveto
+	2 copy vpt 180 360 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/C14 {BL [] 0 setdash 2 copy moveto
+	2 copy vpt 90 360 arc closepath fill
+	vpt 0 360 arc} bind def
+/C15 {BL [] 0 setdash 2 copy vpt 0 360 arc closepath fill
+	vpt 0 360 arc closepath} bind def
+/Rec {newpath 4 2 roll moveto 1 index 0 rlineto 0 exch rlineto
+	neg 0 rlineto closepath} bind def
+/Square {dup Rec} bind def
+/Bsquare {vpt sub exch vpt sub exch vpt2 Square} bind def
+/S0 {BL [] 0 setdash 2 copy moveto 0 vpt rlineto BL Bsquare} bind def
+/S1 {BL [] 0 setdash 2 copy vpt Square fill Bsquare} bind def
+/S2 {BL [] 0 setdash 2 copy exch vpt sub exch vpt Square fill Bsquare} bind def
+/S3 {BL [] 0 setdash 2 copy exch vpt sub exch vpt2 vpt Rec fill Bsquare} bind def
+/S4 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt Square fill Bsquare} bind def
+/S5 {BL [] 0 setdash 2 copy 2 copy vpt Square fill
+	exch vpt sub exch vpt sub vpt Square fill Bsquare} bind def
+/S6 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt vpt2 Rec fill Bsquare} bind def
+/S7 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt vpt2 Rec fill
+	2 copy vpt Square fill Bsquare} bind def
+/S8 {BL [] 0 setdash 2 copy vpt sub vpt Square fill Bsquare} bind def
+/S9 {BL [] 0 setdash 2 copy vpt sub vpt vpt2 Rec fill Bsquare} bind def
+/S10 {BL [] 0 setdash 2 copy vpt sub vpt Square fill 2 copy exch vpt sub exch vpt Square fill
+	Bsquare} bind def
+/S11 {BL [] 0 setdash 2 copy vpt sub vpt Square fill 2 copy exch vpt sub exch vpt2 vpt Rec fill
+	Bsquare} bind def
+/S12 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt2 vpt Rec fill Bsquare} bind def
+/S13 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt2 vpt Rec fill
+	2 copy vpt Square fill Bsquare} bind def
+/S14 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt2 vpt Rec fill
+	2 copy exch vpt sub exch vpt Square fill Bsquare} bind def
+/S15 {BL [] 0 setdash 2 copy Bsquare fill Bsquare} bind def
+/D0 {gsave translate 45 rotate 0 0 S0 stroke grestore} bind def
+/D1 {gsave translate 45 rotate 0 0 S1 stroke grestore} bind def
+/D2 {gsave translate 45 rotate 0 0 S2 stroke grestore} bind def
+/D3 {gsave translate 45 rotate 0 0 S3 stroke grestore} bind def
+/D4 {gsave translate 45 rotate 0 0 S4 stroke grestore} bind def
+/D5 {gsave translate 45 rotate 0 0 S5 stroke grestore} bind def
+/D6 {gsave translate 45 rotate 0 0 S6 stroke grestore} bind def
+/D7 {gsave translate 45 rotate 0 0 S7 stroke grestore} bind def
+/D8 {gsave translate 45 rotate 0 0 S8 stroke grestore} bind def
+/D9 {gsave translate 45 rotate 0 0 S9 stroke grestore} bind def
+/D10 {gsave translate 45 rotate 0 0 S10 stroke grestore} bind def
+/D11 {gsave translate 45 rotate 0 0 S11 stroke grestore} bind def
+/D12 {gsave translate 45 rotate 0 0 S12 stroke grestore} bind def
+/D13 {gsave translate 45 rotate 0 0 S13 stroke grestore} bind def
+/D14 {gsave translate 45 rotate 0 0 S14 stroke grestore} bind def
+/D15 {gsave translate 45 rotate 0 0 S15 stroke grestore} bind def
+/DiaE {stroke [] 0 setdash vpt add M
+  hpt neg vpt neg V hpt vpt neg V
+  hpt vpt V hpt neg vpt V closepath stroke} def
+/BoxE {stroke [] 0 setdash exch hpt sub exch vpt add M
+  0 vpt2 neg V hpt2 0 V 0 vpt2 V
+  hpt2 neg 0 V closepath stroke} def
+/TriUE {stroke [] 0 setdash vpt 1.12 mul add M
+  hpt neg vpt -1.62 mul V
+  hpt 2 mul 0 V
+  hpt neg vpt 1.62 mul V closepath stroke} def
+/TriDE {stroke [] 0 setdash vpt 1.12 mul sub M
+  hpt neg vpt 1.62 mul V
+  hpt 2 mul 0 V
+  hpt neg vpt -1.62 mul V closepath stroke} def
+/PentE {stroke [] 0 setdash gsave
+  translate 0 hpt M 4 {72 rotate 0 hpt L} repeat
+  closepath stroke grestore} def
+/CircE {stroke [] 0 setdash 
+  hpt 0 360 arc stroke} def
+/Opaque {gsave closepath 1 setgray fill grestore 0 setgray closepath} def
+/DiaW {stroke [] 0 setdash vpt add M
+  hpt neg vpt neg V hpt vpt neg V
+  hpt vpt V hpt neg vpt V Opaque stroke} def
+/BoxW {stroke [] 0 setdash exch hpt sub exch vpt add M
+  0 vpt2 neg V hpt2 0 V 0 vpt2 V
+  hpt2 neg 0 V Opaque stroke} def
+/TriUW {stroke [] 0 setdash vpt 1.12 mul add M
+  hpt neg vpt -1.62 mul V
+  hpt 2 mul 0 V
+  hpt neg vpt 1.62 mul V Opaque stroke} def
+/TriDW {stroke [] 0 setdash vpt 1.12 mul sub M
+  hpt neg vpt 1.62 mul V
+  hpt 2 mul 0 V
+  hpt neg vpt -1.62 mul V Opaque stroke} def
+/PentW {stroke [] 0 setdash gsave
+  translate 0 hpt M 4 {72 rotate 0 hpt L} repeat
+  Opaque stroke grestore} def
+/CircW {stroke [] 0 setdash 
+  hpt 0 360 arc Opaque stroke} def
+/BoxFill {gsave Rec 1 setgray fill grestore} def
+/Density {
+  /Fillden exch def
+  currentrgbcolor
+  /ColB exch def /ColG exch def /ColR exch def
+  /ColR ColR Fillden mul Fillden sub 1 add def
+  /ColG ColG Fillden mul Fillden sub 1 add def
+  /ColB ColB Fillden mul Fillden sub 1 add def
+  ColR ColG ColB setrgbcolor} def
+/BoxColFill {gsave Rec PolyFill} def
+/PolyFill {gsave Density fill grestore grestore} def
+/h {rlineto rlineto rlineto gsave closepath fill grestore} bind def
+%
+% PostScript Level 1 Pattern Fill routine for rectangles
+% Usage: x y w h s a XX PatternFill
+%	x,y = lower left corner of box to be filled
+%	w,h = width and height of box
+%	  a = angle in degrees between lines and x-axis
+%	 XX = 0/1 for no/yes cross-hatch
+%
+/PatternFill {gsave /PFa [ 9 2 roll ] def
+  PFa 0 get PFa 2 get 2 div add PFa 1 get PFa 3 get 2 div add translate
+  PFa 2 get -2 div PFa 3 get -2 div PFa 2 get PFa 3 get Rec
+  gsave 1 setgray fill grestore clip
+  currentlinewidth 0.5 mul setlinewidth
+  /PFs PFa 2 get dup mul PFa 3 get dup mul add sqrt def
+  0 0 M PFa 5 get rotate PFs -2 div dup translate
+  0 1 PFs PFa 4 get div 1 add floor cvi
+	{PFa 4 get mul 0 M 0 PFs V} for
+  0 PFa 6 get ne {
+	0 1 PFs PFa 4 get div 1 add floor cvi
+	{PFa 4 get mul 0 2 1 roll M PFs 0 V} for
+ } if
+  stroke grestore} def
+%
+/languagelevel where
+ {pop languagelevel} {1} ifelse
+ 2 lt
+	{/InterpretLevel1 true def}
+	{/InterpretLevel1 Level1 def}
+ ifelse
+%
+% PostScript level 2 pattern fill definitions
+%
+/Level2PatternFill {
+/Tile8x8 {/PaintType 2 /PatternType 1 /TilingType 1 /BBox [0 0 8 8] /XStep 8 /YStep 8}
+	bind def
+/KeepColor {currentrgbcolor [/Pattern /DeviceRGB] setcolorspace} bind def
+<< Tile8x8
+ /PaintProc {0.5 setlinewidth pop 0 0 M 8 8 L 0 8 M 8 0 L stroke} 
+>> matrix makepattern
+/Pat1 exch def
+<< Tile8x8
+ /PaintProc {0.5 setlinewidth pop 0 0 M 8 8 L 0 8 M 8 0 L stroke
+	0 4 M 4 8 L 8 4 L 4 0 L 0 4 L stroke}
+>> matrix makepattern
+/Pat2 exch def
+<< Tile8x8
+ /PaintProc {0.5 setlinewidth pop 0 0 M 0 8 L
+	8 8 L 8 0 L 0 0 L fill}
+>> matrix makepattern
+/Pat3 exch def
+<< Tile8x8
+ /PaintProc {0.5 setlinewidth pop -4 8 M 8 -4 L
+	0 12 M 12 0 L stroke}
+>> matrix makepattern
+/Pat4 exch def
+<< Tile8x8
+ /PaintProc {0.5 setlinewidth pop -4 0 M 8 12 L
+	0 -4 M 12 8 L stroke}
+>> matrix makepattern
+/Pat5 exch def
+<< Tile8x8
+ /PaintProc {0.5 setlinewidth pop -2 8 M 4 -4 L
+	0 12 M 8 -4 L 4 12 M 10 0 L stroke}
+>> matrix makepattern
+/Pat6 exch def
+<< Tile8x8
+ /PaintProc {0.5 setlinewidth pop -2 0 M 4 12 L
+	0 -4 M 8 12 L 4 -4 M 10 8 L stroke}
+>> matrix makepattern
+/Pat7 exch def
+<< Tile8x8
+ /PaintProc {0.5 setlinewidth pop 8 -2 M -4 4 L
+	12 0 M -4 8 L 12 4 M 0 10 L stroke}
+>> matrix makepattern
+/Pat8 exch def
+<< Tile8x8
+ /PaintProc {0.5 setlinewidth pop 0 -2 M 12 4 L
+	-4 0 M 12 8 L -4 4 M 8 10 L stroke}
+>> matrix makepattern
+/Pat9 exch def
+/Pattern1 {PatternBgnd KeepColor Pat1 setpattern} bind def
+/Pattern2 {PatternBgnd KeepColor Pat2 setpattern} bind def
+/Pattern3 {PatternBgnd KeepColor Pat3 setpattern} bind def
+/Pattern4 {PatternBgnd KeepColor Landscape {Pat5} {Pat4} ifelse setpattern} bind def
+/Pattern5 {PatternBgnd KeepColor Landscape {Pat4} {Pat5} ifelse setpattern} bind def
+/Pattern6 {PatternBgnd KeepColor Landscape {Pat9} {Pat6} ifelse setpattern} bind def
+/Pattern7 {PatternBgnd KeepColor Landscape {Pat8} {Pat7} ifelse setpattern} bind def
+} def
+%
+%
+%End of PostScript Level 2 code
+%
+/PatternBgnd {
+  TransparentPatterns {} {gsave 1 setgray fill grestore} ifelse
+} def
+%
+% Substitute for Level 2 pattern fill codes with
+% grayscale if Level 2 support is not selected.
+%
+/Level1PatternFill {
+/Pattern1 {0.250 Density} bind def
+/Pattern2 {0.500 Density} bind def
+/Pattern3 {0.750 Density} bind def
+/Pattern4 {0.125 Density} bind def
+/Pattern5 {0.375 Density} bind def
+/Pattern6 {0.625 Density} bind def
+/Pattern7 {0.875 Density} bind def
+} def
+%
+% Now test for support of Level 2 code
+%
+Level1 {Level1PatternFill} {Level2PatternFill} ifelse
+%
+/Symbol-Oblique /Symbol findfont [1 0 .167 1 0 0] makefont
+dup length dict begin {1 index /FID eq {pop pop} {def} ifelse} forall
+currentdict end definefont pop
+end
+%%EndProlog
+%%Page: 1 1
+gnudict begin
+gsave
+50 50 translate
+0.100 0.100 scale
+90 rotate
+0 -5040 translate
+0 setgray
+newpath
+(Helvetica) findfont 140 scalefont setfont
+1.000 UL
+LTb
+714 280 M
+63 0 V
+6213 0 R
+-63 0 V
+630 280 M
+(-1.5) Rshow
+1.000 UL
+LTb
+714 1003 M
+63 0 V
+6213 0 R
+-63 0 V
+-6297 0 R
+(-1) Rshow
+1.000 UL
+LTb
+714 1727 M
+63 0 V
+6213 0 R
+-63 0 V
+-6297 0 R
+(-0.5) Rshow
+1.000 UL
+LTb
+714 2450 M
+63 0 V
+6213 0 R
+-63 0 V
+-6297 0 R
+( 0) Rshow
+1.000 UL
+LTb
+714 3173 M
+63 0 V
+6213 0 R
+-63 0 V
+-6297 0 R
+( 0.5) Rshow
+1.000 UL
+LTb
+714 3897 M
+63 0 V
+6213 0 R
+-63 0 V
+-6297 0 R
+( 1) Rshow
+1.000 UL
+LTb
+714 4620 M
+63 0 V
+6213 0 R
+-63 0 V
+-6297 0 R
+( 1.5) Rshow
+1.000 UL
+LTb
+714 280 M
+0 63 V
+0 4277 R
+0 -63 V
+714 140 M
+( 0) Cshow
+1.000 UL
+LTb
+1760 280 M
+0 63 V
+0 4277 R
+0 -63 V
+0 -4417 R
+( 2) Cshow
+1.000 UL
+LTb
+2806 280 M
+0 63 V
+0 4277 R
+0 -63 V
+0 -4417 R
+( 4) Cshow
+1.000 UL
+LTb
+3852 280 M
+0 63 V
+0 4277 R
+0 -63 V
+0 -4417 R
+( 6) Cshow
+1.000 UL
+LTb
+4898 280 M
+0 63 V
+0 4277 R
+0 -63 V
+0 -4417 R
+( 8) Cshow
+1.000 UL
+LTb
+5944 280 M
+0 63 V
+0 4277 R
+0 -63 V
+0 -4417 R
+( 10) Cshow
+1.000 UL
+LTb
+6990 280 M
+0 63 V
+0 4277 R
+0 -63 V
+0 -4417 R
+( 12) Cshow
+1.000 UL
+LTb
+1.000 UL
+LTa
+714 2450 M
+6276 0 V
+stroke
+LTb
+714 4620 N
+714 280 L
+6276 0 V
+0 4340 V
+-6276 0 V
+Z stroke
+LCb setrgbcolor
+280 2450 M
+currentpoint gsave translate 90 rotate 0 0 M
+() Cshow
+grestore
+LTb
+LCb setrgbcolor
+3852 -42 M
+() Cshow
+LTb
+3852 4830 M
+(function #4) Cshow
+1.000 UP
+1.000 UL
+LTb
+1.000 UL
+LT0
+LTb
+6339 4487 M
+(-) Rshow
+LT0
+6423 4487 M
+399 0 V
+714 2450 M
+523 1447 V
+523 0 V
+2283 2450 L
+2806 1003 L
+523 0 V
+523 1447 V
+523 1447 V
+523 0 V
+5421 2450 L
+5944 1003 L
+523 0 V
+523 1447 V
+stroke
+LTb
+714 4620 N
+714 280 L
+6276 0 V
+0 4340 V
+-6276 0 V
+Z stroke
+1.000 UP
+1.000 UL
+LTb
+stroke
+grestore
+end
+showpage
+%%Trailer
+%%DocumentFonts: Helvetica
+%%Pages: 1

Added: trunk/libgraphics-gnuplotif-perl/t/test2.gnuplot
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgraphics-gnuplotif-perl/t/test2.gnuplot?rev=46452&op=file
==============================================================================
--- trunk/libgraphics-gnuplotif-perl/t/test2.gnuplot (added)
+++ trunk/libgraphics-gnuplotif-perl/t/test2.gnuplot Tue Oct 27 05:56:26 2009
@@ -1,0 +1,52 @@
+#
+# This file is a GNUPLOT plot script.
+# It was generated automatically by 't/GnuplotIF.t'
+# using the Graphics::GnuplotIF extension to perl.
+# Creation time : Sun Oct 25 02:07:17 2009
+#
+
+set title  "function #2"
+set xlabel  ""
+set ylabel  ""
+set yrange [ -1.5 : 1.5 ]
+set xzeroaxis
+plot \
+ '-' with lines title "function 2"
+
+
+0
+1
+0.8
+0
+-1
+-0.8
+0
+1
+0.8
+0
+-1
+-0.8
+0
+e
+pause 4 
+
+plot \
+ '-' with lines title "function 2"
+
+
+0
+1
+0.8
+0
+-1
+-0.8
+0
+1
+0.8
+0
+-1
+-0.8
+0
+e
+pause 4 
+




More information about the Pkg-perl-cvs-commits mailing list