function obj=subsasgn(obj,subscript,value)
%SUBSASGN subsasgn for an avifile object

%   Copyright 1984-2000 The MathWorks, Inc.
%   $Revision: 1.1 $  $Date: 2000/01/30 16:14:27 $

if length(subscript) > 1
  error('AVIFILE objects only support one level of subscripting.');
end

switch subscript.type
 case '.'
  param = subscript.subs;
  obj = set(obj,param,value);
 otherwise
  error('AVIFILE objects only support structure subscripting.')
end
