Mercurial > octave-nkf

changeset 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 813172f035de
children 958713bc465e
files scripts/ChangeLog scripts/image/colormap.m
diffstat 2 files changed, 10 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Wed Jun 27 15:08:06 2007 +0000
+++ b/scripts/ChangeLog	Wed Jun 27 18:20:19 2007 +0000
@@ -1,3 +1,8 @@
+2007-06-27  Michael Goffioul  <michael.goffioul@swing.be>
+
+	* image/colormap.m: Only return colormap if nargout > 0.
+	Mark as command.
+
 2007-06-25  John W. Eaton  <jwe@octave.org>
 
 	* plot/drawnow.m, plot/__go_draw_axes__.m: Use strcmpi instead of
--- a/scripts/image/colormap.m	Wed Jun 27 15:08:06 2007 +0000
+++ b/scripts/image/colormap.m	Wed Jun 27 18:20:19 2007 +0000
@@ -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