2 # Set a Samba share to read-write mode
5 $ENV{'WEBMIN_CONFIG'} ||= "/etc/webmin";
6 $ENV{'WEBMIN_VAR'} ||= "/var/webmin";
7 if ($0 =~ /^(.*\/)[^\/]+$/) {
11 $0 = "$pwd/readwrite-share.pl";
12 require './samba-lib.pl';
13 $< == 0 || die "readwrite-share.pl must be run as root";
15 @ARGV || die "usage: readwrite-share.pl <share> ...";
18 &setval("writable", "yes");
19 &modify_share($s, $s);