From f9d75803d89ff2b7d08e390bf9d7862acdd9e385 Mon Sep 17 00:00:00 2001
From: freesource <freesource>
Date: Mon, 5 Nov 2001 04:02:54 +0000
Subject: [PATCH] Although this should be done in the Makefile, 0444 is done on
 the replacements if root is running.

---
 gbootroot | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/gbootroot b/gbootroot
index 35ae92a..5c5060d 100755
--- a/gbootroot
+++ b/gbootroot
@@ -492,7 +492,11 @@ if (-d $global_yard_replacements) {
 		       #system "cp -a $File::Find::name $home_yard_replacements/$replacement > /dev/null 2>&1";
 		       system "mkdir $home_yard_replacements/$replacement > /dev/null 2>&1" if -d $File::Find::name;
 		       symlink_builder( $File::Find::name,"$home_yard_replacements/$replacement") if !-d $File::Find::name;
-
+		       # Administrator shouldn't be editing global files.
+		       if ( $> == 0 ) {
+			   system "chmod 0444 $File::Find::name" 
+			       if !-d $File::Find::name;
+		       }
 		   }
 
 	       }, $global_yard_replacements;