[Pkg-octave-devel] New octave-epstk package

[Rafael Laboissiere]

--gj572EiMnwbLXET9
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline

* Dirk Eddelbuettel <edd@debian.org> [2005-02-10 19:55]:

> 
> On 10 February 2005 at 23:39, Rafael Laboissiere wrote:
> | As you probably noticed, I added the octave-epstk package to the SVN
> | repository.  I already uploaded a new upstream release (version 2.0.2).  In
> | octave-epstk_2.0.2-2, I added a trivial patch of mine to allow a path-based
> | search of *.psd files (see the README.Debian attached below).  This changes
> | does not change the default behavior of epsTK.
> | 
> | I do not think that the upstream author would be interested in this patch,
> | since it uses the OCtave-specific function file_in_path.
> 
> There is never a reason /not/ to talk to upstream, so let me introduce the
> new Debian Octave bunch, please meet Stefan; Stefan please meet the Debian
> Octave bunch.  Done. :)

You are right.  To make things clearer, I am attaching below the said patch.
They are trivial one-line patches against edsymbol.m and eglobpar.m.

-- 
Rafael

--gj572EiMnwbLXET9
Content-Type: text/plain; charset=us-ascii
Content-Disposition: attachment; filename="50_psd-path.dpatch"

#! /bin/sh /usr/share/dpatch/dpatch-run
## 50_psd-path.dpatch by  <rafael@debian.org>
##
## All lines beginning with `## DP:' are a description of the patch.
## DP: New patch generated from octave-epstk 2.0.2-2 diff.gz

@DPATCH@

--- octave-epstk-2.0.2.orig/m/edsymbol.m
+++ octave-epstk-2.0.2/m/edsymbol.m
@@ -58,7 +58,7 @@
   psdFileName=symbolFileName(find(symbolFileName~=' '));
   epsFile=fopen(psdFileName,'r');
   if epsFile<2
-    psdFileName=[ePath psdFileName];
+    psdFileName=file_in_path(ePsdPath, psdFileName);
     epsFile=fopen(psdFileName,'r');
   end
   if epsFile>1
--- octave-epstk-2.0.2.orig/m/ftria-center.psd
+++ octave-epstk-2.0.2/m/ftria-center.psd
@@ -0,0 +1,13 @@
+% -*- postscript -*-
+/mm {2.83 mul} def
+/height {8.6603 mm} def
+/width {10 mm} def
+%draw filled triangle
+newpath
+width 2 div neg height 3 div neg 2 copy moveto
+0 height 3 div 2 mul lineto
+width 2 div height 3 div neg lineto lineto
+closepath
+fill
+stroke
+
--- octave-epstk-2.0.2.orig/m/tria-center.psd
+++ octave-epstk-2.0.2/m/tria-center.psd
@@ -0,0 +1,14 @@
+% -*- postscript -*-
+/mm {2.83 mul} def
+/height {8.6603 mm} def
+/width {10 mm} def
+/lineWidth {0.2 mm} def
+%draw triangle
+newpath
+30 mm 30 mm moveto
+%width 2 div neg height 3 div neg 2 copy moveto
+0 height 3 div 2 mul lineto
+width 2 div height 3 div neg lineto lineto
+closepath
+stroke
+
--- octave-epstk-2.0.2.orig/m/eglobpar.m
+++ octave-epstk-2.0.2/m/eglobpar.m
@@ -1,5 +1,6 @@
 global ...
 ePath...
+ePsdPath...
 eGhostview...
 eGhostscript...
 eFileName...

--gj572EiMnwbLXET9--