Mercurial > hg > octave-nkf
changeset 8079:082fa7859574
Additional do not call set with empty arguments fixes
| author | David Bateman <dbateman@free.fr> |
|---|---|
| date | Tue, 02 Sep 2008 14:52:28 -0400 |
| parents | 4665276ff7f6 |
| children | 9f10a7b28ae3 |
| files | scripts/plot/__area__.m scripts/plot/__bars__.m scripts/plot/__quiver__.m scripts/plot/__stem__.m scripts/plot/stairs.m |
| diffstat | 5 files changed, 15 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/plot/__area__.m +++ b/scripts/plot/__area__.m @@ -63,7 +63,9 @@ addproperty ("areagroup", hg, "data"); set (retval, "areagroup", retval); - set (hg, args{:}); + if (! isempty (args)) + set (hg, args{:}); + endif endfor endfunction
--- a/scripts/plot/__bars__.m +++ b/scripts/plot/__bars__.m @@ -113,7 +113,9 @@ addproperty ("bargroup", hg, "data"); set (tmp, "bargroup", tmp); - set (hg, args{:}); + if (! isempty (args)) + set (hg, args{:}); + endif if (i == 1) set (h_baseline, "parent", get (hg, "parent")); endif
--- a/scripts/plot/__quiver__.m +++ b/scripts/plot/__quiver__.m @@ -295,7 +295,9 @@ addlistener (hg, "markerfacecolor", @update_props); addlistener (hg, "markersize", @update_props); - set (hg, args{:}); + if (! isempty (args)) + set (hg, args{:}); + endif unwind_protect_cleanup set (h, "nextplot", hstate); end_unwind_protect
--- a/scripts/plot/__stem__.m +++ b/scripts/plot/__stem__.m @@ -143,7 +143,9 @@ addlistener (hg, "ydata", @update_data); addlistener (hg, "zdata", @update_data); - set (hg, args{:}); + if (! isempty (args)) + set (hg, args{:}); + endif if (i == 1 && !isempty(h_baseline)) set (h_baseline, "parent", get (hg, "parent")); endif
--- a/scripts/plot/stairs.m +++ b/scripts/plot/stairs.m @@ -175,7 +175,9 @@ addlistener (hg, "markeredgecolor", @update_props); addlistener (hg, "markersize", @update_props); - set (hg, args{:}); + if (! isempty (args)) + set (hg, args{:}); + endif endfor unwind_protect_cleanup set (gca (), "nextplot", hold_state);