function aObj = editstyle(aObj, style)
%EDITLINE/EDITSTYLE

%   Copyright 1984-2000 The MathWorks, Inc. 
%   $Revision: 1.8 $  $Date: 2000/06/01 02:52:38 $


switch style
case 'solid'
   val = '-';
case 'dash'
   val = '--';
case 'dot'
   val = ':';
case 'dashdot'
   val = '-.';
otherwise
   return
end

aObj = set(aObj, 'LineStyle', val);
