[interchange-cvs] interchange - jon modified 2 files

[interchange-cvs at icdevgroup.org]

User:      jon
Date:      2005-08-19 04:54:51 GMT
Modified:  code/SystemTag attr_list.coretag
Added:     code/SystemTag uc_attr_list.coretag
Log:
Split uc-attr-list into its own file.

Revision  Changes    Path
1.6       +3 -18     interchange/code/SystemTag/attr_list.coretag


rev 1.6, prev_rev 1.5
Index: attr_list.coretag
===================================================================
RCS file: /var/cvs/interchange/code/SystemTag/attr_list.coretag,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -u -r1.5 -r1.6
--- attr_list.coretag	9 Feb 2005 13:39:41 -0000	1.5
+++ attr_list.coretag	19 Aug 2005 04:54:51 -0000	1.6
@@ -1,12 +1,12 @@
-# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Copyright 2002-2005 Interchange Development Group (http://www.icdevgroup.org/)
 # Licensed under the GNU GPL v2. See file LICENSE for details.
-# $Id: attr_list.coretag,v 1.5 2005/02/09 13:39:41 docelic Exp $
+# $Id: attr_list.coretag,v 1.6 2005/08/19 04:54:51 jon Exp $
 
 UserTag attr-list           addAttr
 UserTag attr-list           hasEndTag
 UserTag attr-list           PosNumber    0
 UserTag attr-list           noRearrange
-UserTag attr-list           Version      $Revision: 1.5 $
+UserTag attr-list           Version      $Revision: 1.6 $
 UserTag attr-list           Routine      <<EOR
 sub {
 	my ($opt, $body) = @_;
@@ -14,20 +14,5 @@
 		$opt = $opt->{hash};
 	}
 	return Vend::Interpolate::tag_attr_list($body, $opt);
-}
-EOR
-
-UserTag uc-attr-list           addAttr
-UserTag uc-attr-list           hasEndTag
-UserTag uc-attr-list           PosNumber    0
-UserTag uc-attr-list           noRearrange
-UserTag uc-attr-list           Version      $Revision: 1.5 $
-UserTag uc-attr-list           Routine      <<EOR
-sub {
-	my ($opt, $body) = @_;
-	if( ref $opt->{hash} ) {
-		$opt = $opt->{hash};
-	}
-	return Vend::Interpolate::tag_attr_list($body, $opt, 1);
 }
 EOR



1.1                  interchange/code/SystemTag/uc_attr_list.coretag


rev 1.1, prev_rev 1.0
Index: uc_attr_list.coretag
===================================================================
# Copyright 2002-2005 Interchange Development Group (http://www.icdevgroup.org/)
# Licensed under the GNU GPL v2. See file LICENSE for details.
# $Id: uc_attr_list.coretag,v 1.1 2005/08/19 04:54:51 jon Exp $

UserTag uc-attr-list           addAttr
UserTag uc-attr-list           hasEndTag
UserTag uc-attr-list           PosNumber    0
UserTag uc-attr-list           noRearrange
UserTag uc-attr-list           Version      $Revision: 1.1 $
UserTag uc-attr-list           Routine      <<EOR
sub {
	my ($opt, $body) = @_;
	if( ref $opt->{hash} ) {
		$opt = $opt->{hash};
	}
	return Vend::Interpolate::tag_attr_list($body, $opt, 1);
}
EOR