parent
e999544a81
commit
7e48030cba
@ -1,66 +0,0 @@
|
|||||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
|
||||||
%
|
|
||||||
% Driver update dialog.
|
|
||||||
%
|
|
||||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
|
||||||
|
|
||||||
|
|
||||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
|
||||||
% Show driver update.
|
|
||||||
%
|
|
||||||
% ( ) => ( )
|
|
||||||
%
|
|
||||||
/dud.redraw {
|
|
||||||
update.pos exch pop 0 exch moveto currentpoint
|
|
||||||
txt_dud_ready strsize 7 add exch pop clip.size pop exch
|
|
||||||
image
|
|
||||||
|
|
||||||
do_driverupdate {
|
|
||||||
currentfont
|
|
||||||
font.normal setfont
|
|
||||||
update.pos moveto 8 3 rmoveto txt_dud_ready
|
|
||||||
lightblue setcolor show
|
|
||||||
setfont
|
|
||||||
} if
|
|
||||||
} def
|
|
||||||
|
|
||||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
|
||||||
% Toggle driver update.
|
|
||||||
%
|
|
||||||
% ( ) => ( )
|
|
||||||
%
|
|
||||||
/panel.dud {
|
|
||||||
do_driverupdate .undef eq {
|
|
||||||
/do_driverupdate 1 def
|
|
||||||
} {
|
|
||||||
/do_driverupdate .undef def
|
|
||||||
} ifelse
|
|
||||||
|
|
||||||
dud.redraw
|
|
||||||
|
|
||||||
"driverupdate" help.setcontext
|
|
||||||
} def
|
|
||||||
|
|
||||||
|
|
||||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
|
||||||
% Return width of driver update entry.
|
|
||||||
%
|
|
||||||
% ( ) => ( width )
|
|
||||||
%
|
|
||||||
/panel.dud.width {
|
|
||||||
txt_driver_update strsize pop
|
|
||||||
} def
|
|
||||||
|
|
||||||
|
|
||||||
% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
|
|
||||||
% Redraw panel entry.
|
|
||||||
%
|
|
||||||
% ( panel ) => ( )
|
|
||||||
%
|
|
||||||
/panel.dud.update {
|
|
||||||
panel.text.moveto
|
|
||||||
|
|
||||||
txt_driver_update show
|
|
||||||
} def
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in new issue