adapt "dud" to mandriva stage1 para (updatemodules)

1 files changed, 2 insertions, 38 deletions

diff --git a/src/dia_dud.inc b/src/dia_dud.inc
index 647965c..2b49627 100644
--- a/src/dia_dud.inc
+++ b/src/dia_dud.inc
@@ -10,16 +10,12 @@
 %
 /.dud_yes	0 def
 /.dud_no	1 def
-/.dud_file	2 def
-/.dud_url	3 def
 
 /dud.last .dud_no def
 
 /dud.options [
-  "dud=1"
+  "updatemodules"
   ""
-  .undef
-  .undef
 ] def
 
 
@@ -33,13 +29,10 @@
 
   /xmenu xmenu.dud def
 
-  /input.edit.dud_file [ 127 string ] def
-  /input.edit.dud_url [ 127 string ] def
-
   dud.read.config
 
   xmenu .xm_current dud.last put
-  xmenu .xm_list [ /txt_yes /txt_no /txt_file dud.url.name ] put
+  xmenu .xm_list [ /txt_yes /txt_no ] put  
 
   xmenu .xm_title /txt_driver_update put
 } def
@@ -53,9 +46,6 @@
 /dud.update {
   /xmenu xmenu.dud def
 
-  xmenu .xm_current get dup .dud_file eq over .dud_url eq or {
-    dud.dialog
-  } if
   /window.action actRedrawPanel def
 } def
 
@@ -109,24 +99,6 @@
 
   xmenu .xm_current get
 
-  dup .dud_file eq {
-    dia .title txt_driver_update2 put
-
-    % Must all be of same size!
-    dia .ed.list 1 array put
-    dia .ed.buffer.list input.edit.dud_file put
-    dia .ed.text.list [ txt_dud_file_msg ] put
-  } if
-
-  dup .dud_url eq {
-    dia .title txt_dud_download put
-
-    % Must all be of same size!
-    dia .ed.list 1 array put
-    dia .ed.buffer.list input.edit.dud_url put
-    dia .ed.text.list [ txt_dud_enter_url ] put
-  } if
-
   pop
 
   dia .ed.focus 0 put
@@ -153,13 +125,5 @@
   dud.default
   dup "yes"  eq { /dud.last .dud_yes def } if
   dup "no"   eq { /dud.last .dud_no def } if
-  dup "file" eq { /dud.last .dud_file def } if
-  dup "url"  eq { /dud.last .dud_url def } if
   pop
-
-  input.edit.dud_file 0 get dud.file strcpy pop
-  input.edit.dud_url  0 get dud.url  strcpy pop
-
-  dud.url.name "" eq { /dud.url.name "URL" def } if
-
 } def