From 7e7c4e20b8fa00c156f6ba06a371482d29d8a7ce Mon Sep 17 00:00:00 2001
From: "justdave%syndicomm.com" <>
Date: Fri, 20 Apr 2001 03:46:53 +0000
Subject: Changing all chmod 1777 to chmod 01777.  Without the leading 0 it's
 interpreted as decimal instead of octal (oops)

---
 checksetup.pl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/checksetup.pl b/checksetup.pl
index 0978d4e25..b2c479c83 100755
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -448,7 +448,7 @@ unless (-d 'data') {
     print "Creating data directory ...\n";
     mkdir 'data', 0770;
     if ($my_webservergroup eq "") {
-        chmod 1777, 'data';
+        chmod 01777, 'data';
     }
     open FILE, '>>data/comments'; close FILE;
     open FILE, '>>data/nomail'; close FILE;
@@ -542,7 +542,7 @@ if ($my_webservergroup) {
     # make sure that contrib keeps the permissions it had (don't touch it)
     chmod 0770, 'data', 'shadow', 'graphs';
     chmod 0666, glob('data/*');
-    chmod 1777, glob('data/*/'); # directories stay executable
+    chmod 01777, glob('data/*/'); # directories stay executable
 }
 
 
@@ -2057,7 +2057,7 @@ unless (-d 'graphs') {
     print "Creating graphs directory...\n";
     mkdir 'graphs', 1770; 
     if ($my_webservergroup eq "") {
-        chmod 1777, 'graphs';
+        chmod 01777, 'graphs';
     } 
     
     # Upgrade data format
@@ -2158,7 +2158,7 @@ unless (-d 'data/duplicates') {
     print "Creating duplicates directory...\n";
     mkdir 'data/duplicates', 0770; 
     if ($my_webservergroup eq "") {
-        chmod 1777, 'data/duplicates';
+        chmod 01777, 'data/duplicates';
     } 
 }
 
-- 
cgit v1.2.3-24-g4f1b