diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-09 10:01:33 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-09 10:01:33 +0000 |
| commit | 7b326b8fb9f487c37a746859f471d97eb6b8318c (patch) | |
| tree | 201740d271865975981f7f803ac640b53b2ae52e | |
| parent | b7d0dcc8951c5dbb26ddd222da7a4096c8329899 (diff) | |
| download | drakx-backup-do-not-use-7b326b8fb9f487c37a746859f471d97eb6b8318c.tar drakx-backup-do-not-use-7b326b8fb9f487c37a746859f471d97eb6b8318c.tar.gz drakx-backup-do-not-use-7b326b8fb9f487c37a746859f471d97eb6b8318c.tar.bz2 drakx-backup-do-not-use-7b326b8fb9f487c37a746859f471d97eb6b8318c.tar.xz drakx-backup-do-not-use-7b326b8fb9f487c37a746859f471d97eb6b8318c.zip | |
fix boot_conf_path usage
| -rwxr-xr-x | perl-install/standalone/draksplash | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash index e4710330a..3101128fd 100755 --- a/perl-install/standalone/draksplash +++ b/perl-install/standalone/draksplash @@ -210,10 +210,10 @@ sub write_boot_thm { &set_thm_values; my $logo = $boot_conf_frame{widgets}{check}{logo}->get_active ? 'yes' : 'no'; my $quiet = $boot_conf_frame{widgets}{check}{quiet}->get_active ? 'yes' : 'no'; - my $globalconf_file = boot_conf_path.$theme{name}.'/global.config'; - my $cfg_file = boot_conf_path . $theme{name} . "$cfg_path/bootsplash-" . $theme{res}{res} . '.cfg'; + my $globalconf_file = $boot_conf_path.$theme{name}.'/global.config'; + my $cfg_file = $boot_conf_path . $theme{name} . "$cfg_path/bootsplash-" . $theme{res}{res} . '.cfg'; #- verify all dir exists or create them - foreach my $dir (boot_conf_path . $theme{name} . $cfg_path, $thm_path.$theme{name} . '/images/') { + foreach my $dir ($boot_conf_path . $theme{name} . $cfg_path, $thm_path.$theme{name} . '/images/') { mkdir_p($dir) if !-d $dir; } #- copy image to dest by convert @@ -275,7 +275,7 @@ sub get_this_thm_res_conf() { } sub read_boot_conf { - chdir(boot_conf_path); + chdir($boot_conf_path); my $line; if (-f $theme{name} . "/$cfg_path/bootsplash-" . $theme{res}{res} . '.cfg') { local *CFG; |