changeset 22760:c4d80b9d2898

maint: Capitalize variable names appearing in error() messages of m-files. * scripts/audio/@audioplayer/get.m, scripts/audio/@audiorecorder/get.m, interp1.m, narginchk.m, nargoutchk.m, randi.m, __fltk_file_filter__.m, imshow.m, rgbplot.m, javachk.m, usejava.m, condest.m, unpack.m, pqpnonneg.m, savepath.m, default_prefix.m, get_forge_download.m, get_forge_pkg.m, installed_packages.m, annotation.m, daspect.m, pbaspect.m, isocaps.m, pan.m, printd.m, __gnuplot_draw_axes__.m, rotate.m, rotate3d.m, zoom.m, splinefit.m, addpref.m, getpref.m, rmpref.m, eigs.m, normrnd.m, t_test_regression.m: Capitalize variable names appearing in error() messages.
author Rik <rik@octave.org>
date Mon, 14 Nov 2016 12:12:02 -0800
parents 39f39eb4e476
children 57e82b74f89b
files scripts/audio/@audioplayer/get.m scripts/audio/@audiorecorder/get.m scripts/general/interp1.m scripts/general/narginchk.m scripts/general/nargoutchk.m scripts/general/randi.m scripts/gui/private/__fltk_file_filter__.m scripts/image/imshow.m scripts/image/rgbplot.m scripts/java/javachk.m scripts/java/usejava.m scripts/linear-algebra/condest.m scripts/miscellaneous/unpack.m scripts/optimization/pqpnonneg.m scripts/path/savepath.m scripts/pkg/private/default_prefix.m scripts/pkg/private/get_forge_download.m scripts/pkg/private/get_forge_pkg.m scripts/pkg/private/installed_packages.m scripts/plot/appearance/annotation.m scripts/plot/appearance/daspect.m scripts/plot/appearance/pbaspect.m scripts/plot/draw/isocaps.m scripts/plot/util/pan.m scripts/plot/util/printd.m scripts/plot/util/private/__gnuplot_draw_axes__.m scripts/plot/util/rotate.m scripts/plot/util/rotate3d.m scripts/plot/util/zoom.m scripts/polynomial/splinefit.m scripts/prefs/addpref.m scripts/prefs/getpref.m scripts/prefs/rmpref.m scripts/sparse/eigs.m scripts/statistics/distributions/normrnd.m scripts/statistics/tests/t_test_regression.m
diffstat 36 files changed, 63 insertions(+), 59 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/audio/@audioplayer/get.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/audio/@audioplayer/get.m	Mon Nov 14 12:12:02 2016 -0800
@@ -48,7 +48,7 @@
         retval{i} = getfield (properties, pnames{i});
       endfor
     else
-      error ("@audioplayer/get: invalid name argument");
+      error ("@audioplayer/get: invalid NAME argument");
     endif
   endif
 
--- a/scripts/audio/@audiorecorder/get.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/audio/@audiorecorder/get.m	Mon Nov 14 12:12:02 2016 -0800
@@ -48,7 +48,7 @@
         retval{i} = getfield (properties, pnames{i});
       endfor
     else
-      error ("@audiorecorder/get: invalid name argument");
+      error ("@audiorecorder/get: invalid NAME argument");
     endif
   endif
 
--- a/scripts/general/interp1.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/general/interp1.m	Mon Nov 14 12:12:02 2016 -0800
@@ -238,7 +238,7 @@
           warning ("interp1: multiple discontinuities at the same X value");
         endif
       else
-        error ("interp1: discontinuities not supported for method '%s'",
+        error ("interp1: discontinuities not supported for METHOD '%s'",
                                                                    method);
       endif
     endif
@@ -366,7 +366,7 @@
       endif
 
     otherwise
-      error ("interp1: invalid method '%s'", method);
+      error ("interp1: invalid METHOD '%s'", METHOD);
 
   endswitch
 
--- a/scripts/general/narginchk.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/general/narginchk.m	Mon Nov 14 12:12:02 2016 -0800
@@ -40,11 +40,11 @@
   if (nargin != 2)
     print_usage;
   elseif (! isnumeric (minargs) || ! isscalar (minargs))
-    error ("narginchk: minargs must be a numeric scalar");
+    error ("narginchk: MINARGS must be a numeric scalar");
   elseif (! isnumeric (maxargs) || ! isscalar (maxargs))
-    error ("narginchk: maxargs must be a numeric scalar");
+    error ("narginchk: MAXARGS must be a numeric scalar");
   elseif (minargs > maxargs)
-    error ("narginchk: minargs cannot be larger than maxargs");
+    error ("narginchk: MINARGS cannot be larger than MAXARGS");
   endif
 
   args = evalin ("caller", "nargin;");
--- a/scripts/general/nargoutchk.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/general/nargoutchk.m	Mon Nov 14 12:12:02 2016 -0800
@@ -84,11 +84,11 @@
   elseif (nargout == 0 && nargin == 2)
 
     if (! isnumeric (minargs) || ! isscalar (minargs))
-      error ("nargoutchk: minargs must be a numeric scalar");
+      error ("nargoutchk: MINARGS must be a numeric scalar");
     elseif (! isnumeric (maxargs) || ! isscalar (maxargs))
-      error ("nargoutchk: maxargs must be a numeric scalar");
+      error ("nargoutchk: MAXARGS must be a numeric scalar");
     elseif (minargs > maxargs)
-      error ("nargoutchk: minargs cannot be larger than maxargs");
+      error ("nargoutchk: MINARGS cannot be larger than MAXARGS");
     endif
 
     args = evalin ("caller", "nargout;");
--- a/scripts/general/randi.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/general/randi.m	Mon Nov 14 12:12:02 2016 -0800
@@ -105,7 +105,7 @@
       maxval = double (flintmax (rclass));
       minval = -maxval;
     else
-      error ("randi: unknown requested output class '%s'", rclass);
+      error ("randi: unknown requested output CLASS '%s'", rclass);
     endif
     if (imax > maxval)
       warning (["randi: integer IMAX exceeds requested type.  ", ...
--- a/scripts/gui/private/__fltk_file_filter__.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/gui/private/__fltk_file_filter__.m	Mon Nov 14 12:12:02 2016 -0800
@@ -28,7 +28,7 @@
   retval = "";
   [r, c] = size (file_filter);
   if ((c == 0) || (c > 2))
-    error ("file filter cell must have 1 or 2 columns");
+    error ("file FILTER cell must have 1 or 2 columns");
   endif
   fltk_str = "";
   for idx = 1 : r
--- a/scripts/image/imshow.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/image/imshow.m	Mon Nov 14 12:12:02 2016 -0800
@@ -91,7 +91,7 @@
   nd = ndims (im);
 
   if (! ((isnumeric (im) || islogical (im)) && (nd == 2 || nd == 3)))
-    error ("imshow: IM must be an image or the filename of an image");
+    error ("imshow: IM must be an image or the FILENAME of an image");
   endif
 
   if (nd == 2)
--- a/scripts/image/rgbplot.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/image/rgbplot.m	Mon Nov 14 12:12:02 2016 -0800
@@ -67,7 +67,7 @@
       set (gca, "ytick", []);
       colormap (cmap);
     otherwise
-      error ("rgbplot: unknown style '%s'", style);
+      error ("rgbplot: unknown STYLE '%s'", style);
   endswitch
   xlabel ("color index");
 
--- a/scripts/java/javachk.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/java/javachk.m	Mon Nov 14 12:12:02 2016 -0800
@@ -109,7 +109,7 @@
         chk = true;
       end_try_catch
     otherwise
-      error ("javachk: unrecognized feature '%s', can be one of 'awt'|'desktop'|'jvm'|'swing'\n", feature);
+      error ("javachk: unrecognized FEATURE '%s', can be one of 'awt'|'desktop'|'jvm'|'swing'\n", feature);
   endswitch
 
   if (! chk)
--- a/scripts/java/usejava.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/java/usejava.m	Mon Nov 14 12:12:02 2016 -0800
@@ -77,7 +77,7 @@
         retval = ! javaMethod ("isHeadless", "java.awt.GraphicsEnvironment");
       end_try_catch
     otherwise
-      error ("usejava: unrecognized feature '%s'", feature);
+      error ("usejava: unrecognized FEATURE '%s'", feature);
   endswitch
 
 endfunction
--- a/scripts/linear-algebra/condest.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/linear-algebra/condest.m	Mon Nov 14 12:12:02 2016 -0800
@@ -231,7 +231,7 @@
 endfunction
 
 function value = solve_sparse (flag, x, n, real_op, L , U , P , Pc)
-  switch flag
+  switch (flag)
     case "dim"
       value = n;
     case "real"
@@ -244,7 +244,7 @@
 endfunction
 
 function value = solve_not_sparse (flag, x, n, real_op, L, U, P)
-  switch flag
+  switch (flag)
     case "dim"
       value = n;
     case "real"
--- a/scripts/miscellaneous/unpack.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/miscellaneous/unpack.m	Mon Nov 14 12:12:02 2016 -0800
@@ -90,7 +90,7 @@
       ## FIXME: The above code is not a perfect test for a URL
       gfile = glob (file);
       if (isempty (gfile))
-        error ('unpack: file "%s" not found', file{1});
+        error ('unpack: FILE "%s" not found', file{1});
       else
         file = gfile;
       endif
--- a/scripts/optimization/pqpnonneg.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/optimization/pqpnonneg.m	Mon Nov 14 12:12:02 2016 -0800
@@ -21,17 +21,21 @@
 ## -*- texinfo -*-
 ## @deftypefn  {} {@var{x} =} pqpnonneg (@var{c}, @var{d})
 ## @deftypefnx {} {@var{x} =} pqpnonneg (@var{c}, @var{d}, @var{x0})
+## @deftypefnx {} {@var{x} =} pqpnonneg (@var{c}, @var{d}, @var{x0}, @var{options})
 ## @deftypefnx {} {[@var{x}, @var{minval}] =} pqpnonneg (@dots{})
 ## @deftypefnx {} {[@var{x}, @var{minval}, @var{exitflag}] =} pqpnonneg (@dots{})
 ## @deftypefnx {} {[@var{x}, @var{minval}, @var{exitflag}, @var{output}] =} pqpnonneg (@dots{})
 ## @deftypefnx {} {[@var{x}, @var{minval}, @var{exitflag}, @var{output}, @var{lambda}] =} pqpnonneg (@dots{})
 ## Minimize @code{1/2*x'*c*x + d'*x} subject to @code{@var{x} >= 0}.
 ##
-## @var{c} ## and @var{d} must be real, and @var{c} must be symmetric and
+## @var{c} and @var{d} must be real, and @var{c} must be symmetric and
 ## positive definite.
 ##
 ## @var{x0} is an optional initial guess for @var{x}.
 ##
+## @var{options} is an options structure to change the behavior of the
+## algorithm.
+##
 ## Outputs:
 ##
 ## @itemize @bullet
--- a/scripts/path/savepath.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/path/savepath.m	Mon Nov 14 12:12:02 2016 -0800
@@ -81,7 +81,7 @@
   ## Write the results.
   [fid, msg] = fopen (file, "wt");
   if (fid < 0)
-    error ("savepath: unable to open file for writing, %s, %s", file, msg);
+    error ("savepath: unable to open FILE for writing, %s, %s", file, msg);
   endif
   unwind_protect
     fprintf (fid, "%s\n", pre{:});
--- a/scripts/pkg/private/default_prefix.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/pkg/private/default_prefix.m	Mon Nov 14 12:12:02 2016 -0800
@@ -21,7 +21,7 @@
 ## Undocumented internal function.
 ## @end deftypefn
 
-function [prefix, archprefix] = default_prefix (global_install, desc)
+function [prefix, archprefix] = default_prefix (global_install)
 
   if (global_install)
     prefix = fullfile (OCTAVE_HOME (), "share", "octave", "packages");
--- a/scripts/pkg/private/get_forge_download.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/pkg/private/get_forge_download.m	Mon Nov 14 12:12:02 2016 -0800
@@ -18,7 +18,7 @@
 ## <http://www.gnu.org/licenses/>.
 
 ## -*- texinfo -*-
-## @deftypefn {} {[@var{url}, @var{local_file}] =} list_forge_packages ()
+## @deftypefn {} {[@var{url}, @var{local_file}] =} get_forge_download (@var{name})
 ## Undocumented internal function.
 ## @end deftypefn
 
--- a/scripts/pkg/private/get_forge_pkg.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/pkg/private/get_forge_pkg.m	Mon Nov 14 12:12:02 2016 -0800
@@ -31,7 +31,7 @@
   if (! (ischar (name) && rows (name) == 1 && ndims (name) == 2))
     error ("get_forge_pkg: package NAME must be a string");
   elseif (! all (isalnum (name) | name == "-" | name == "." | name == "_"))
-    error ("get_forge_pkg: invalid package name: %s", name);
+    error ("get_forge_pkg: invalid package NAME: %s", name);
   endif
 
   name = tolower (name);
--- a/scripts/pkg/private/installed_packages.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/pkg/private/installed_packages.m	Mon Nov 14 12:12:02 2016 -0800
@@ -18,7 +18,7 @@
 ## <http://www.gnu.org/licenses/>.
 
 ## -*- texinfo -*-
-## @deftypefn {} {[@var{out1}, @var{out2}] =} installed_packages (@var{local_list}, @var{global_list})
+## @deftypefn {} {[@var{out1}, @var{out2}] =} installed_packages (@var{local_list}, @var{global_list}, @var{pkgname})
 ## Undocumented internal function.
 ## @end deftypefn
 
@@ -58,7 +58,7 @@
   endif
 
   ## Now check if the package is loaded.
-  ## FIXME: couldn't dir_in_loadpath() be used here?
+  ## FIXME: Couldn't dir_in_loadpath() be used here?
   tmppath = strrep (path (), "\\", "/");
   for i = 1:numel (installed_pkgs_lst)
     if (strfind (tmppath, strrep (installed_pkgs_lst{i}.dir, '\', '/')))
--- a/scripts/plot/appearance/annotation.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/appearance/annotation.m	Mon Nov 14 12:12:02 2016 -0800
@@ -208,7 +208,7 @@
         endif
       endif
     otherwise
-      error ("annotation: unknown annotation type %s", objtype);
+      error ("annotation: unknown annotation TYPE %s", objtype);
   endswitch
 
   ## options
--- a/scripts/plot/appearance/daspect.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/appearance/daspect.m	Mon Nov 14 12:12:02 2016 -0800
@@ -87,7 +87,7 @@
         case "mode"
           daratio = get (hax, "dataaspectratiomode");
         otherwise
-          error ("daspect: Invalid mode <%s>", arg);
+          error ("daspect: Invalid MODE <%s>", arg);
       endswitch
     else
       print_usage ();
--- a/scripts/plot/appearance/pbaspect.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/appearance/pbaspect.m	Mon Nov 14 12:12:02 2016 -0800
@@ -88,7 +88,7 @@
         case "mode"
           pbratio = get (hax, "plotboxaspectratiomode");
         otherwise
-          error ("pbaspect: Invalid mode <%s>", arg);
+          error ("pbaspect: Invalid MODE <%s>", arg);
       endswitch
     else
       print_usage ();
--- a/scripts/plot/draw/isocaps.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/draw/isocaps.m	Mon Nov 14 12:12:02 2016 -0800
@@ -165,7 +165,7 @@
                        vertices(:,1), vertices(:,2), vertices(:,3))';
   endif
 
-  switch nargout
+  switch (nargout)
     case 0
       hp = patch ("Faces", faces, "Vertices", vertices, ...
                   "FaceVertexCData", fvcdata, ...
@@ -269,7 +269,7 @@
 
   ## check x
   if (isvector (x) && length (x) == v_sz(2))
-    x = repmat (x(:)', [v_sz(1) 1 v_sz(3)]);
+    x = repmat (x(:).', [v_sz(1) 1 v_sz(3)]);
   elseif (! size_equal (v, x))
     error ("isocaps: X must match the size of V");
   endif
--- a/scripts/plot/util/pan.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/util/pan.m	Mon Nov 14 12:12:02 2016 -0800
@@ -96,7 +96,7 @@
           set (hfig, "__pan_mode__", pm);
           update_mouse_mode (hfig, arg);
         otherwise
-          error ("pan: unrecognized option '%s'", arg);
+          error ("pan: unrecognized OPTION '%s'", arg);
       endswitch
     else
       error ("pan: wrong type argument '%s'", class (arg));
--- a/scripts/plot/util/printd.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/util/printd.m	Mon Nov 14 12:12:02 2016 -0800
@@ -41,7 +41,7 @@
 
   ## Extract .suffix from filename
   if ((sufix = rindex (filename, ".")) <= 0)
-    error ("printd: output filename '%s' requires a suffix.\nOptions are: pdf ps eps txt jpg jpeg", filename);
+    error ("printd: output FILENAME '%s' requires a suffix.\nOptions are: pdf ps eps txt jpg jpeg", filename);
   endif
   opt = substr (filename, sufix+1);
   [pf, tempf, mag] = mkstemp ("oct-XXXXXX", 1);
--- a/scripts/plot/util/private/__gnuplot_draw_axes__.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/util/private/__gnuplot_draw_axes__.m	Mon Nov 14 12:12:02 2016 -0800
@@ -702,7 +702,7 @@
         [style, sidx] = do_linestyle_command (obj, obj.color, data_idx,
                                               plot_stream);
 
-        if isempty (style{1})
+        if (isempty (style{1}))
           style{1} = "points";
           data{data_idx} = {};
         endif
@@ -1383,7 +1383,7 @@
               titlespec{data_idx} = tspec;
               usingclause{data_idx} = sprintf ("record=%dx1 using ($1):($2):($3)%s",
                                                yrec, ccol);
-              if isempty (style{i_stl})
+              if (isempty (style{i_stl}))
                 style{i_stl} = "points";
                 data{data_idx} = {};
               else
--- a/scripts/plot/util/rotate.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/util/rotate.m	Mon Nov 14 12:12:02 2016 -0800
@@ -78,7 +78,7 @@
 
   if (nargin == 4)
     if (! (isnumeric (origin) && numel (origin) == 3))
-       error ("rotate: invalid origin");
+       error ("rotate: invalid ORIGIN");
     endif
   else
     ## Should Z limit be considered when computing origin?
--- a/scripts/plot/util/rotate3d.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/util/rotate3d.m	Mon Nov 14 12:12:02 2016 -0800
@@ -85,7 +85,7 @@
           set (hfig, "__rotate_mode__", rm);
           update_mouse_mode (hfig, arg);
         otherwise
-          error ("rotate3d: unrecognized option '%s'", arg);
+          error ("rotate3d: unrecognized OPTION '%s'", arg);
       endswitch
     else
       error ("rotate3d: wrong type argument '%s'", class (arg));
--- a/scripts/plot/util/zoom.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/plot/util/zoom.m	Mon Nov 14 12:12:02 2016 -0800
@@ -103,10 +103,10 @@
         case 1
           xfactor = yfactor = factor;
         otherwise
-          error ("zoom: invalid factor");
+          error ("zoom: invalid FACTOR");
       endswitch
       if (xfactor < 0 || yfactor < 0)
-        error ("zoom: factor must be greater than 1");
+        error ("zoom: FACTOR must be greater than 1");
       elseif (xfactor == 1 && yfactor == 1)
         return;
       endif
@@ -153,7 +153,7 @@
             __zoom__ (cax, "reset");
           endif
         otherwise
-          error ("zoom: unrecognized option '%s'", arg);
+          error ("zoom: unrecognized OPTION '%s'", arg);
       endswitch
     else
       error ("zoom: wrong type argument '%s'", class (arg));
--- a/scripts/polynomial/splinefit.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/polynomial/splinefit.m	Mon Nov 14 12:12:02 2016 -0800
@@ -127,14 +127,14 @@
     if (0 < props.beta && props.beta < 1)
       args{end+1} = props.beta;
     else
-      error ("splinefit:invalidbeta", "invalid beta parameter (0 < beta < 1)");
+      error ("splinefit:invalidbeta", "invalid beta parameter (0 < BETA < 1)");
     endif
   endif
   if (isfield (props, "order"))
     if (props.order >= 0)
       args{end+1} = props.order + 1;
     else
-      error ("splinefit:invalidorder", "invalid order");
+      error ("splinefit:invalidorder", "invalid ORDER");
     endif
   endif
   if (isfield (props, "constraints"))
--- a/scripts/prefs/addpref.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/prefs/addpref.m	Mon Nov 14 12:12:02 2016 -0800
@@ -52,7 +52,7 @@
 
   if (ischar (pref))
     if (isfield (prefs, group) && isfield (prefs.(group), pref))
-      error ("addpref: preference %s already exists in group %s", pref, group);
+      error ("addpref: preference %s already exists in GROUP %s", pref, group);
     else
       prefs.(group).(pref) = val;
     endif
@@ -62,7 +62,7 @@
     endif
     for i = 1:numel (pref)
       if (isfield (prefs, group) && isfield (prefs.(group), pref{i}))
-        error ("addpref: preference %s already exists in group %s",
+        error ("addpref: preference %s already exists in GROUP %s",
                pref{i}, group);
       else
         prefs.(group).(pref{i}) = val{i};
--- a/scripts/prefs/getpref.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/prefs/getpref.m	Mon Nov 14 12:12:02 2016 -0800
@@ -81,7 +81,7 @@
         addpref (group, pref, default);
         retval = default;
       else
-        error ("getpref: preference %s does not exist in group %s",
+        error ("getpref: preference %s does not exist in GROUP %s",
                pref, group);
       endif
     else
@@ -96,7 +96,7 @@
           addpref (group, pref{i}, default{i});
           retval{i} = default{i};
         else
-          error ("getpref: preference %s does not exist in group %s",
+          error ("getpref: preference %s does not exist in GROUP %s",
                  pref{i}, group);
         endif
       endfor
--- a/scripts/prefs/rmpref.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/prefs/rmpref.m	Mon Nov 14 12:12:02 2016 -0800
@@ -47,7 +47,7 @@
 
   if (nargin == 1)
     if (! ispref (group))
-      error ("rmpref: group %s does not exist", group);
+      error ("rmpref: GROUP %s does not exist", group);
     endif
     prefs = loadprefs ();
     prefs = rmfield (prefs, group);
@@ -60,7 +60,7 @@
       saveprefs (prefs);
     else
       if (! ispref (group))
-        error ("rmpref: group %s does not exist", group);
+        error ("rmpref: GROUP %s does not exist", group);
       elseif (ischar (pref))
         error ("rmpref: preference %s does not exist", pref);
       else
--- a/scripts/sparse/eigs.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/sparse/eigs.m	Mon Nov 14 12:12:02 2016 -0800
@@ -287,53 +287,53 @@
         if (real_valued && symmetric)
           [~, idx] = sort (real (d), "descend");
         else
-          error ('eigs: sigma = "la" requires real symmetric problem');
+          error ('eigs: SIGMA = "la" requires real symmetric problem');
         endif
 
       case "sa"
         if (real_valued && symmetric)
           [~, idx] = sort (real (d), "ascend");
         else
-          error ('eigs: sigma = "sa" requires real symmetric problem');
+          error ('eigs: SIGMA = "sa" requires real symmetric problem');
         endif
 
       case "be"
         if (real_valued && symmetric)
           [~, idx] = sort (real (d), "ascend");
         else
-          error ('eigs: sigma = "be" requires real symmetric problem');
+          error ('eigs: SIGMA = "be" requires real symmetric problem');
         endif
 
       case "lr"
         if (! (real_valued || symmetric))
           [~, idx] = sort (real (d), "descend");
         else
-          error ('eigs: sigma = "lr" requires complex or unsymmetric problem');
+          error ('eigs: SIGMA = "lr" requires complex or unsymmetric problem');
         endif
 
       case "sr"
         if (! (real_valued || symmetric))
           [~, idx] = sort (real (d), "ascend");
         else
-          error ('eigs: sigma = "sr" requires complex or unsymmetric problem');
+          error ('eigs: SIGMA = "sr" requires complex or unsymmetric problem');
         endif
 
       case "li"
         if (! (real_valued || symmetric))
           [~, idx] = sort (imag (d), "descend");
         else
-          error ('eigs: sigma = "li" requires complex or unsymmetric problem');
+          error ('eigs: SIGMA = "li" requires complex or unsymmetric problem');
         endif
 
       case "si"
         if (! (real_valued || symmetric))
           [~, idx] = sort (imag (d), "ascend");
         else
-          error ('eigs: sigma = "si" requires complex or unsymmetric problem');
+          error ('eigs: SIGMA = "si" requires complex or unsymmetric problem');
         endif
 
       otherwise
-        error ("eigs: unrecognized value for sigma: %s", sigma);
+        error ("eigs: unrecognized value for SIGMA: %s", sigma);
     endswitch
   else
     ## numeric sigma, find k closest values
--- a/scripts/statistics/distributions/normrnd.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/statistics/distributions/normrnd.m	Mon Nov 14 12:12:02 2016 -0800
@@ -47,7 +47,7 @@
   if (! isscalar (mu) || ! isscalar (sigma))
     [retval, mu, sigma] = common_size (mu, sigma);
     if (retval > 0)
-      error ("normrnd: mu and sigma must be of common size or scalars");
+      error ("normrnd: MU and SIGMA must be of common size or scalars");
     endif
   endif
 
@@ -73,7 +73,7 @@
   endif
 
   if (! isscalar (mu) && ! isequal (size (mu), sz))
-    error ("normrnd: mu and sigma must be scalar or of size SZ");
+    error ("normrnd: MU and SIGMA must be scalar or of size SZ");
   endif
 
   if (isa (mu, "single") || isa (sigma, "single"))
--- a/scripts/statistics/tests/t_test_regression.m	Thu Oct 27 09:24:58 2016 +0200
+++ b/scripts/statistics/tests/t_test_regression.m	Mon Nov 14 12:12:02 2016 -0800
@@ -88,7 +88,7 @@
   elseif (strcmp (alt, "<"))
     pval = cdf;
   else
-    error ("t_test_regression: the value '%s' for alt is not possible", alt);
+    error ("t_test_regression: the value '%s' for ALT is not possible", alt);
   endif
 
   if (nargout == 0)