$OpenBSD: patch-kde-dev-scripts_unsercmake,v 1.2 2013/07/05 14:32:50 zhuk Exp $
Cleanup development scripts, making them more portable and secure.
Upstream review 110858: http://git.reviewboard.kde.org/r/110858/
--- kde-dev-scripts/unsercmake.orig	Fri Jun 28 22:03:13 2013
+++ kde-dev-scripts/unsercmake	Fri Jul  5 18:14:32 2013
@@ -268,7 +268,7 @@ sub readCmakeFile {
     }
 
     my @subdirs;
-    open FILE, "$dir/$file";
+    open FILE, "<", "$dir/$file";
     my $inLink=0;
     my $lib = "";
     foreach $line (<FILE>) {
@@ -316,7 +316,7 @@ sub readCmakeFile {
     close FILE;
 
     # only go into subdir when the DartTestfile lists the subdir.
-    open FILE, "$builddir/$dir/DartTestfile.txt";
+    open FILE, "<", "$builddir/$dir/DartTestfile.txt";
     foreach $line (<FILE>) {
         if($line=~/^SUBDIRS\s*\((.*)\)/) {
             my $subdir;
@@ -448,7 +448,7 @@ sub parseArguments() {
 
 sub checkTargetAvail() {
     my $target=shift(@_);
-    open FILE, "Makefile";
+    open FILE, "<", "Makefile";
     foreach $line (<FILE>) {
         if($line=~/^$target:/) {
             close FILE;
