Mercurial > hg > xemacs-beta
comparison netinstall/uninstall.cc @ 666:146d342ff859
[xemacs-hg @ 2001-09-25 02:35:32 by andyp]
more updates
author | andyp |
---|---|
date | Tue, 25 Sep 2001 02:35:32 +0000 |
parents | ce0b3f2eff35 |
children | a307f9a2021d |
comparison
equal
deleted
inserted
replaced
665:fdefd0186b75 | 666:146d342ff859 |
---|---|
66 static int uninstall_started = 0; | 66 static int uninstall_started = 0; |
67 | 67 |
68 extern char * map_filename (char *fn, int type); | 68 extern char * map_filename (char *fn, int type); |
69 void remove_desktop_setup (); | 69 void remove_desktop_setup (); |
70 static void start_uninstall (); | 70 static void start_uninstall (); |
71 extern char* find_xemacs_exe_name(); | |
71 | 72 |
72 char * | 73 char * |
73 base (char *s); | 74 base (char *s); |
74 | 75 |
75 static BOOL | 76 static BOOL |
279 pinfo(*np).version = "0"; | 280 pinfo(*np).version = "0"; |
280 // Crude but effective | 281 // Crude but effective |
281 if (pkg != 0) | 282 if (pkg != 0) |
282 if (strncmp ("xemacs-i686", pkg, 11) == 0 | 283 if (strncmp ("xemacs-i686", pkg, 11) == 0 |
283 || (strncmp ("xemacs-i586", pkg, 11) == 0)) | 284 || (strncmp ("xemacs-i586", pkg, 11) == 0)) |
284 np->type = install_type; | 285 { |
286 np->type = install_type; | |
287 xemacs_package = np; | |
288 } | |
285 } | 289 } |
286 fclose (db); | 290 fclose (db); |
287 } | 291 } |
288 | 292 |
289 static DWORD WINAPI | 293 static DWORD WINAPI |
304 uninstall_one (package[i].name, package[i].type, i); | 308 uninstall_one (package[i].name, package[i].type, i); |
305 } | 309 } |
306 | 310 |
307 PostMessage (unins_dialog, XM_DONE, 0, 0); | 311 PostMessage (unins_dialog, XM_DONE, 0, 0); |
308 | 312 |
313 remove (concat (root_dir, XEMACS_SETUP_DIR, "installed.db.old", 0)); | |
314 remove (concat (root_dir, XEMACS_SETUP_DIR, "installed.db", 0)); | |
315 | |
309 remove_desktop_setup(); | 316 remove_desktop_setup(); |
310 char *odbn = concat (root_dir, XEMACS_SETUP_DIR, "installed.db", 0); | |
311 char *sdbn = concat (root_dir, XEMACS_SETUP_DIR, "installed.db.old", 0); | |
312 | |
313 remove (sdbn); | |
314 remove (odbn); | |
315 | |
316 remove_xemacs_root(); | 317 remove_xemacs_root(); |
317 remove_uninstall_path(); | 318 remove_uninstall_path(); |
318 | 319 |
319 if (num_installs == 0) | 320 if (num_installs == 0) |
320 { | 321 { |