[interchange-cvs] interchange - racke modified code/UserTag/capture_page.tag

[interchange-cvs at icdevgroup.org]

User:      racke
Date:      2008-09-26 19:47:02 GMT
Modified:  code/UserTag capture_page.tag
Log:
match up parentheses

Revision  Changes    Path
1.11                 interchange/code/UserTag/capture_page.tag


rev 1.11, prev_rev 1.10
Index: capture_page.tag
===================================================================
RCS file: /var/cvs/interchange/code/UserTag/capture_page.tag,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -r1.10 -r1.11
--- capture_page.tag	26 Sep 2008 12:27:41 -0000	1.10
+++ capture_page.tag	26 Sep 2008 19:47:02 -0000	1.11
@@ -5,11 +5,11 @@
 # the Free Software Foundation; either version 2 of the License, or
 # (at your option) any later version.  See the LICENSE file for details.
 # 
-# $Id: capture_page.tag,v 1.10 2008-09-26 12:27:41 racke Exp $
+# $Id: capture_page.tag,v 1.11 2008-09-26 19:47:02 racke Exp $
 
 UserTag capture_page Order   page file
 UserTag capture_page addAttr
-UserTag capture_page Version $Revision: 1.10 $
+UserTag capture_page Version $Revision: 1.11 $
 UserTag capture_page Routine <<EOR
 sub {
 	my ($page, $file, $opt) = @_;
@@ -53,7 +53,7 @@
 		$retval = 1;
 	}
 
-	if ($file} {
+	if ($file) {
 	   $retval = Vend::File::writefile (">$file", $pageref, 
            {auto_create_dir => $opt->{auto_create_dir},
          	umask => $opt->{umask}});