/usr/lib/scilab-plotlib/macros/focus.sci is in scilab-plotlib 0.42-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 | function focus(ax_to_focus)
global SCI5
if argn(2)==0
ax_to_focus=get('current_axes');
end
win=ax_to_focus(1).parent;
win.immediate_drawing="off";
ax=win.children;
others_visible='off';
if ax_to_focus(1).user_data.OuterPosition==[0 0 1 1] // focus out
others_visible='on';
end
for i=1:length(ax)
if or(ax(i)==ax_to_focus)
if ax(i).user_data.OuterPosition==[0 0 1 1] // focus out
_update_axes(ax(i),list('OuterPosition',ax(i).user_data.previousPosition));
_message='';
else // focus in
ax(i).user_data.previousPosition=ax(i).user_data.OuterPosition;
_update_axes(ax(i),list('OuterPosition',[0 0 1 1]));
_message='Plotlib message : double-click within axes to restore initial position';
end
else
ax(i).visible=others_visible;
end
end
win.immediate_drawing="on";
if win.pixmap=="on"
show_pixmap;
end
if SCI5
win.info_message=_message;
else
xinfo(_message);
end
endfunction
|