Mercurial > hg > octave-nkf
diff src/pt-idx.cc @ 7043:83400ec4eb1e
[project @ 2007-10-19 21:00:42 by jwe]
author | jwe |
---|---|
date | Fri, 19 Oct 2007 21:00:42 +0000 |
parents | 1f16da18d85d |
children | c344920f9e9d |
line wrap: on
line diff
--- a/src/pt-idx.cc +++ b/src/pt-idx.cc @@ -488,18 +488,7 @@ // comma-separated list? if (first_retval_object.is_map ()) - { - octave_value_list tmp_list - = first_retval_object.subsref (type, idx, 1); - - if (! error_state) - { - octave_value val = tmp_list(0); - - retval.numel (val.is_cs_list () - ? val.numel () : 1); - } - } + retval.numel (first_retval_object.numel ()); } } else