devel/glibmm/files/patch-docs::reference::beautify_docs.pl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

--- docs/reference/beautify_docs.pl.in.orig Thu Feb 12 02:52:02 2004
+++ docs/reference/beautify_docs.pl.in  Thu Feb 12 03:00:08 2004
@@ -25,7 +25,7 @@
   my ($file) = @_;
   my @outbuf;
 
-  open(FILE, '<', $file);
+  open(FILE, "<$file");
 
   while(<FILE>)
   {
@@ -71,7 +71,7 @@
     push(@outbuf, $_);
   }
 
-  open(FILE, '>', $file);
+  open(FILE, ">$file");
 
   # write the whole buffer back
   print FILE "$_" foreach(@outbuf);