summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorAntoine Ginies <aginies@mandriva.com>2005-08-25 13:07:48 +0000
committerAntoine Ginies <aginies@mandriva.com>2005-08-25 13:07:48 +0000
commitc1f72276e089de701cce0f4f8def94e87ed13a5c (patch)
tree8020c58fe0ce7b85b83bfd247d358d33a8181f4b /perl-install/standalone
parent8a8fcc473783ff017da0c98cb08303bda182eb31 (diff)
downloaddrakx-backup-do-not-use-c1f72276e089de701cce0f4f8def94e87ed13a5c.tar
drakx-backup-do-not-use-c1f72276e089de701cce0f4f8def94e87ed13a5c.tar.gz
drakx-backup-do-not-use-c1f72276e089de701cce0f4f8def94e87ed13a5c.tar.bz2
drakx-backup-do-not-use-c1f72276e089de701cce0f4f8def94e87ed13a5c.tar.xz
drakx-backup-do-not-use-c1f72276e089de701cce0f4f8def94e87ed13a5c.zip
cosmetic fix
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/draksambashare2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/draksambashare b/perl-install/standalone/draksambashare
index ad702f8aa..dd393344b 100755
--- a/perl-install/standalone/draksambashare
+++ b/perl-install/standalone/draksambashare
@@ -422,7 +422,7 @@ sub modify_entry {
my $share = $share_name->get_text;
my $test_dir = $dir->get_text;
$comment->get_text or err_dialog(N("Information"), N("Please enter a Comment for this share.")) and return 1;
- if ($share !~ 'homes' and !-d $test_dir) {
+ if ($share !~ /^homes$/ and !-d $test_dir) {
err_dialog(N("Error!"), N("Please enter a directory to share.")) and return;
}
foreach ($create_mask->get_text, $directory_mask->get_text) {