# HG changeset patch
# User jwe
# Date 1109019702 0
# Node ID ee2af1e830b28e1ccb69bf341032cae95666ffbc
# Parent  b111ca4715c6cd8a17c90e1cfdd462905bdef9ab
[project @ 2005-02-21 21:01:42 by jwe]

diff -r b111ca4715c6 -r ee2af1e830b2 scripts/ChangeLog
--- a/scripts/ChangeLog	Mon Feb 21 19:41:23 2005 +0000
+++ b/scripts/ChangeLog	Mon Feb 21 21:01:42 2005 +0000
@@ -1,5 +1,7 @@
 2005-02-21  John W. Eaton  <jwe@octave.org>
 
+	* statistics/base/qqplot.m: Use feval instead of eval.
+
 	* plot/grid.m, plot/plot_border.m, plot/title.m, plot/top_title.m,
 	plot/__axis_label__.m: Issue replot command.
 
diff -r b111ca4715c6 -r ee2af1e830b2 scripts/statistics/base/qqplot.m
--- a/scripts/statistics/base/qqplot.m	Mon Feb 21 19:41:23 2005 +0000
+++ b/scripts/statistics/base/qqplot.m	Mon Feb 21 21:01:42 2005 +0000
@@ -67,12 +67,14 @@
     q = feval (f, t);
     q_label = func2str (f);
   else
-    param_string = sprintf ("%g", varargin{1});
-    for k = 2 : (nargin - 2);
-      param_string = sprintf ("%s, %g", param_string, varargin{k})
-    endfor
-    q = eval (sprintf ("%s (t, %s);", f, param_string));
-    q_label = sprintf ("%s with parameter(s) %s", func2str (f), param_string);
+    q = feval (f, t, varargin{:});
+    if (nargin > 3)
+      tmp = sprintf (", %g", varargin{2:end});
+    else 
+      tmp = "";
+    endif
+    q_label = sprintf ("%s with parameter(s) %g%s", func2str (f),
+		       varargin{1}, tmp);
   endif
 
   if (nargout == 0)