[interchange-cvs] interchange - racke modified code/UserTag/capture_page.tag
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Fri Sep 26 19:47:02 UTC 2008
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}});
More information about the interchange-cvs
mailing list