xferloglog.m

shh_status = get(0,'ShowHiddenHandles');                                    
set(0,'ShowHiddenHandles','On')                                             
hr = get(0,'Children');
flg = 0;
for ii=1:length(hr),
    hf = hr(ii);
    if ~isempty(strfind(get(hf,'Name'), 'Transfer Function'))
        ha = get(hf,'CurrentAxes');                                                 
        set(ha,'XScale', 'log');                                                      
        set(ha, 'XMinorGrid', 'on');                                                  
        set(ha, 'YMinorGrid', 'on');                                                  
        set(ha,'XLim', [1 100]);
        flg = 1;
        break;
    end                                      
    
end
if flg ==0, warning('Failed to get figure handle'), end
set(0,'ShowHiddenHandles',shh_status)