[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Gforge-commits] gforge/deb-specific group_dump_update.pl, 1.2, 1.2.2.1
From: |
lo-lan-do |
Subject: |
[Gforge-commits] gforge/deb-specific group_dump_update.pl, 1.2, 1.2.2.1 |
Date: |
Tue, 20 Jan 2004 15:56:34 -0600 |
Update of /cvsroot/gforge/gforge/deb-specific
In directory db.perdue.net:/tmp/cvs-serv3830/deb-specific
Modified Files:
Tag: Branch_3_1
group_dump_update.pl
Log Message:
[From HEAD] Fixed permissions for groups' "home" directories.
Index: group_dump_update.pl
===================================================================
RCS file: /cvsroot/gforge/gforge/deb-specific/group_dump_update.pl,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -u -d -r1.2 -r1.2.2.1
--- group_dump_update.pl 18 Oct 2003 13:14:38 -0000 1.2
+++ group_dump_update.pl 20 Jan 2004 21:56:32 -0000 1.2.2.1
@@ -89,15 +89,15 @@
if ($verbose) {print("Making a Group for : $gname\n")};
- mkdir $group_dir, 0775;
- mkdir $log_dir, 0775;
- mkdir $cgi_dir, 0775;
- mkdir $ht_dir, 0775;
+ mkdir $group_dir, 2775;
+ mkdir $log_dir, 2775;
+ mkdir $cgi_dir, 2775;
+ mkdir $ht_dir, 2775;
# perl is sometime fucked to create with right permission
- system("chmod 0755 $group_dir");
- system("chmod 0755 $log_dir");
- system("chmod 0755 $cgi_dir");
- system("chmod 0755 $ht_dir");
+ system("chmod 2775 $group_dir");
+ system("chmod 2775 $log_dir");
+ system("chmod 2775 $cgi_dir");
+ system("chmod 2775 $ht_dir");
chown $dummy_uid, $gid, ($group_dir, $log_dir, $cgi_dir, $ht_dir);
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Gforge-commits] gforge/deb-specific group_dump_update.pl, 1.2, 1.2.2.1,
lo-lan-do <=