Mercurial > hg > octave-lyh

diff scripts/image/colormap.m @ 6762:721953d49b19

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-06-27 18:20:19 by jwe]
author jwe
date Wed, 27 Jun 2007 18:20:19 +0000
parents 44c91c5dfe1d
children 76e3d985ae56
line wrap: on
line diff
--- a/scripts/image/colormap.m
+++ b/scripts/image/colormap.m
@@ -37,6 +37,8 @@
 ## Created: July 1994
 ## Adapted-By: jwe
 
+## PKG_ADD: mark_as_command colormap
+
 function cmap = colormap (map)
 
   if (nargin > 1)
@@ -67,6 +69,8 @@
   endif
 
   ## Return current color map.
-  cmap = get (gcf (), "colormap");
+  if (nargout > 0)
+    cmap = get (gcf (), "colormap");
+  endif
 
 endfunction