patches: Added octave-nargin.dpatch.

[pkg-pfstools.git] / debian / patches / octave-nargin.dpatch

diff --git a/debian/patches/octave-nargin.dpatch b/debian/patches/octave-nargin.dpatch
new file mode 100755 (executable)
index 0000000..e171aea
--- /dev/null
+++ b/debian/patches/octave-nargin.dpatch
@@ -0,0 +1,43 @@
+#! /bin/sh /usr/share/dpatch/dpatch-run
+## octave-nargin.dpatch by Sebastian Harl <tokkee@debian.org>
+##
+## DP: Use nargin instead of length(argv).
+## DP:
+## DP: length(argv) does not work reliably when no arguments are passed to
+## DP: some octave script.
+
+@DPATCH@
+
+--- a/src/octave/pfsoctavelum
++++ b/src/octave/pfsoctavelum
+@@ -29,7 +29,7 @@
+ 
+ #fprintf( stderr, "l = %d\n", length( argv ) );
+ 
+-if( length( argv ) != 1 )
++if( nargin != 1 )
+   error( "Expecting exactly one parameter with octave code to be execuded" ); 
+ endif
+ 
+--- a/src/octave/pfsoctavergb
++++ b/src/octave/pfsoctavergb
+@@ -29,7 +29,7 @@
+ 
+ #fprintf( stderr, "l = %d\n", length( argv ) );
+ 
+-if( length( argv ) != 1 )
++if( nargin != 1 )
+   error( "Expecting exactly one parameter with octave code to be execuded" ); 
+ endif
+ 
+--- a/src/octave/pfsstat
++++ b/src/octave/pfsstat
+@@ -29,7 +29,7 @@
+ 
+ #fprintf( stderr, "l = %d\n", length( argv ) );
+ 
+-if( length( argv ) != 0 )
++if( nargin != 0 )
+   error( "Expecting no parameters" ); 
+ endif
+