function A = editfont(A)
%AXISTEXT/EDITFONT

%   Copyright (c) 1984-98 by The MathWorks, Inc.
%   $Revision: 1.7 $  $Date: 1998/09/16 17:27:43 $

fig = get(A,'Figure');
scribetextdlg(get(getobj(fig),'Selection'));
