[interchange-cvs] interchange - docelic modified 66 files
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Sun Feb 13 19:42:56 EST 2005
User: docelic
Date: 2005-02-14 00:42:55 GMT
Modified: code/UI_Tag add_gpg_key.coretag assume_identity.tag
Modified: auto_wizard.coretag available_ups_internal.coretag
Modified: available_www_shipping.coretag
Modified: backup_database.coretag backup_file.coretag
Modified: base_url.coretag check_upload.coretag
Modified: content_editor.coretag content_info.coretag
Modified: content_modify.coretag cp.coretag crypt.coretag
Modified: db_columns.coretag db_hash.coretag diff.coretag
Modified: diffmerge.coretag directive_value.coretag
Modified: display.coretag dump_session.coretag
Modified: export_database.coretag file_info.coretag
Modified: file_navigator.coretag filters.coretag
Modified: flex_select.coretag get_gpg_keys.coretag
Modified: global_value.coretag grep_mm.coretag if_mm.coretag
Modified: image_collate.coretag import_fields.coretag
Modified: jsq.coretag jsqn.coretag list_databases.coretag
Modified: list_glob.coretag list_keys.coretag
Modified: list_pages.coretag menu_load.coretag
Modified: meta_info.coretag meta_record.coretag
Modified: mm_locale.coretag mm_value.coretag newer.coretag
Modified: quick_table.coretag read_shipping.coretag
Modified: reconfig.coretag reconfig_time.coretag
Modified: return_to.coretag rotate_table.coretag
Modified: row_edit.coretag run_profile.coretag su.coretag
Modified: substitute_file.coretag tabbed_display.coretag
Modified: table_editor.coretag traffic_report.coretag
Modified: uneval.coretag unlink_file.coretag
Modified: update_order_status.tag version.coretag
Modified: widget.coretag widget_meta.coretag
Modified: write_relative_file.coretag write_shipping.coretag
Modified: xfer_catalog.coretag
Log:
Header/license fix or Version update+minor formatting fix, or both
Revision Changes Path
1.3 +6 -1 interchange/code/UI_Tag/add_gpg_key.coretag
rev 1.3, prev_rev 1.2
Index: add_gpg_key.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/add_gpg_key.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- add_gpg_key.coretag 7 Feb 2002 02:40:23 -0000 1.2
+++ add_gpg_key.coretag 14 Feb 2005 00:42:52 -0000 1.3
@@ -1,5 +1,10 @@
-UserTag add-gpg-key Order name
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: add_gpg_key.coretag,v 1.3 2005/02/14 00:42:52 docelic Exp $
+
+UserTag add-gpg-key Order name
UserTag add-gpg-key addAttr
+UserTag add-gpg-key Version $Revision: 1.3 $
UserTag add-gpg-key Routine <<EOR
sub {
my ($name, $opt) = @_;
1.3 +5 -0 interchange/code/UI_Tag/assume_identity.tag
rev 1.3, prev_rev 1.2
Index: assume_identity.tag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/assume_identity.tag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- assume_identity.tag 2 Apr 2003 18:59:47 -0000 1.2
+++ assume_identity.tag 14 Feb 2005 00:42:52 -0000 1.3
@@ -1,6 +1,11 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: assume_identity.tag,v 1.3 2005/02/14 00:42:52 docelic Exp $
+
UserTag assume-identity Order file locale
UserTag assume-identity addAttr
UserTag assume-identity PosNumber 2
+UserTag assume-identity Version $Revision: 1.3 $
UserTag assume-identity Routine <<EOR
sub {
my ($file, $locale, $opt) = @_;
1.17 +7 -3 interchange/code/UI_Tag/auto_wizard.coretag
rev 1.17, prev_rev 1.16
Index: auto_wizard.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/auto_wizard.coretag,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -r1.16 -r1.17
--- auto_wizard.coretag 29 Dec 2004 20:10:29 -0000 1.16
+++ auto_wizard.coretag 14 Feb 2005 00:42:52 -0000 1.17
@@ -1,8 +1,12 @@
-UserTag auto-wizard Order name
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: auto_wizard.coretag,v 1.17 2005/02/14 00:42:52 docelic Exp $
+
+UserTag auto-wizard Order name
UserTag auto-wizard AddAttr
UserTag auto-wizard HasEndTag
-UserTag auto-wizard Version $Version$
-UserTag auto-wizard Routine <<EOR
+UserTag auto-wizard Version $Revision: 1.17 $
+UserTag auto-wizard Routine <<EOR
use vars qw/$Session $Tag $CGI $Tmp $Scratch $Values $ready_safe/;
1.2 +5 -0 interchange/code/UI_Tag/available_ups_internal.coretag
rev 1.2, prev_rev 1.1
Index: available_ups_internal.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/available_ups_internal.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- available_ups_internal.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ available_ups_internal.coretag 14 Feb 2005 00:42:52 -0000 1.2
@@ -1,3 +1,8 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: available_ups_internal.coretag,v 1.2 2005/02/14 00:42:52 docelic Exp $
+
+UserTag available_ups_internal Version $Revision: 1.2 $
UserTag available_ups_internal Routine <<EOR
sub {
my (@files) = glob('products/[0-9][0-9][0-9].csv');
1.2 +6 -1 interchange/code/UI_Tag/available_www_shipping.coretag
rev 1.2, prev_rev 1.1
Index: available_www_shipping.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/available_www_shipping.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- available_www_shipping.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ available_www_shipping.coretag 14 Feb 2005 00:42:52 -0000 1.2
@@ -1,4 +1,9 @@
-UserTag available_www_shipping Order only
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: available_www_shipping.coretag,v 1.2 2005/02/14 00:42:52 docelic Exp $
+
+UserTag available_www_shipping Order only
+UserTag available_www_shipping Version $Revision: 1.2 $
UserTag available_www_shipping Routine <<EOR
sub {
my ($only) = @_;
1.4 +7 -2 interchange/code/UI_Tag/backup_database.coretag
rev 1.4, prev_rev 1.3
Index: backup_database.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/backup_database.coretag,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- backup_database.coretag 14 Apr 2004 04:32:05 -0000 1.3
+++ backup_database.coretag 14 Feb 2005 00:42:52 -0000 1.4
@@ -1,6 +1,11 @@
-UserTag backup-database Order tables
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: backup_database.coretag,v 1.4 2005/02/14 00:42:52 docelic Exp $
+
+UserTag backup-database Order tables
UserTag backup-database AddAttr
-UserTag backup-database Routine <<EOR
+UserTag backup-database Version $Revision: 1.4 $
+UserTag backup-database Routine <<EOR
sub {
my ($tables, $opt) = @_;
my (@tables) = grep /\S/, split /['\s\0]+/, $tables;
1.3 +7 -2 interchange/code/UI_Tag/backup_file.coretag
rev 1.3, prev_rev 1.2
Index: backup_file.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/backup_file.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- backup_file.coretag 2 Aug 2002 03:42:24 -0000 1.2
+++ backup_file.coretag 14 Feb 2005 00:42:52 -0000 1.3
@@ -1,6 +1,11 @@
-UserTag backup-file Order file
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: backup_file.coretag,v 1.3 2005/02/14 00:42:52 docelic Exp $
+
+UserTag backup-file Order file
UserTag backup-file AddAttr
-UserTag backup-file Routine <<EOR
+UserTag backup-file Version $Revision: 1.3 $
+UserTag backup-file Routine <<EOR
require File::Copy;
require File::Path;
require File::Basename;
1.2 +5 -0 interchange/code/UI_Tag/base_url.coretag
rev 1.2, prev_rev 1.1
Index: base_url.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/base_url.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- base_url.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ base_url.coretag 14 Feb 2005 00:42:52 -0000 1.2
@@ -1 +1,6 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: base_url.coretag,v 1.2 2005/02/14 00:42:52 docelic Exp $
+
+UserTag base-url Version $Revision: 1.2 $
UserTag base-url Routine sub { return $Vend::Cfg->{VendURL} }
1.2 +6 -3 interchange/code/UI_Tag/check_upload.coretag
rev 1.2, prev_rev 1.1
Index: check_upload.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/check_upload.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- check_upload.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ check_upload.coretag 14 Feb 2005 00:42:52 -0000 1.2
@@ -1,7 +1,11 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: check_upload.coretag,v 1.2 2005/02/14 00:42:52 docelic Exp $
-UserTag check-upload Order file same
+UserTag check-upload Order file same
UserTag check-upload PosNumber 2
-UserTag check-upload Routine <<EOR
+UserTag check-upload Version $Revision: 1.2 $
+UserTag check-upload Routine <<EOR
sub {
use File::Copy;
my $file = shift;
@@ -16,4 +20,3 @@
return '';
}
EOR
-
1.4 +7 -2 interchange/code/UI_Tag/content_editor.coretag
rev 1.4, prev_rev 1.3
Index: content_editor.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/content_editor.coretag,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- content_editor.coretag 15 Aug 2002 06:18:20 -0000 1.3
+++ content_editor.coretag 14 Feb 2005 00:42:52 -0000 1.4
@@ -1,7 +1,12 @@
-UserTag content-editor Order name
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: content_editor.coretag,v 1.4 2005/02/14 00:42:52 docelic Exp $
+
+UserTag content-editor Order name
UserTag content-editor addAttr
UserTag content-editor hasEndTag
-UserTag content-editor Routine <<EOR
+UserTag content-editor Version $Revision: 1.4 $
+UserTag content-editor Routine <<EOR
use UI::ContentEditor;
sub {
return UI::ContentEditor::editor(@_);
1.3 +7 -2 interchange/code/UI_Tag/content_info.coretag
rev 1.3, prev_rev 1.2
Index: content_info.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/content_info.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- content_info.coretag 13 Sep 2002 20:46:17 -0000 1.2
+++ content_info.coretag 14 Feb 2005 00:42:52 -0000 1.3
@@ -1,6 +1,11 @@
-UserTag content-info Order dir
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: content_info.coretag,v 1.3 2005/02/14 00:42:52 docelic Exp $
+
+UserTag content-info Order dir
UserTag content-info addAttr
-UserTag content-info Routine <<EOR
+UserTag content-info Version $Revision: 1.3 $
+UserTag content-info Routine <<EOR
use UI::ContentEditor;
sub {
UI::ContentEditor::content_info(@_);
1.2 +7 -2 interchange/code/UI_Tag/content_modify.coretag
rev 1.2, prev_rev 1.1
Index: content_modify.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/content_modify.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- content_modify.coretag 16 Feb 2002 09:39:08 -0000 1.1
+++ content_modify.coretag 14 Feb 2005 00:42:52 -0000 1.2
@@ -1,6 +1,11 @@
-UserTag content-modify Order op name type
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: content_modify.coretag,v 1.2 2005/02/14 00:42:52 docelic Exp $
+
+UserTag content-modify Order op name type
UserTag content-modify addAttr
-UserTag content-modify Routine <<EOR
+UserTag content-modify Version $Revision: 1.2 $
+UserTag content-modify Routine <<EOR
use UI::ContentEditor;
sub {
return UI::ContentEditor::content_modify(@_);
1.3 +7 -2 interchange/code/UI_Tag/cp.coretag
rev 1.3, prev_rev 1.2
Index: cp.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/cp.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- cp.coretag 29 May 2002 01:04:46 -0000 1.2
+++ cp.coretag 14 Feb 2005 00:42:52 -0000 1.3
@@ -1,6 +1,11 @@
-UserTag cp Order from to
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: cp.coretag,v 1.3 2005/02/14 00:42:52 docelic Exp $
+
+UserTag cp Order from to
UserTag cp addAttr
-UserTag cp Routine <<EOR
+UserTag cp Version $Revision: 1.3 $
+UserTag cp Routine <<EOR
require File::Copy;
sub {
my ($from, $to, $opt) = @_;
1.4 +4 -4 interchange/code/UI_Tag/crypt.coretag
rev 1.4, prev_rev 1.3
Index: crypt.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/crypt.coretag,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- crypt.coretag 25 Sep 2004 23:40:59 -0000 1.3
+++ crypt.coretag 14 Feb 2005 00:42:52 -0000 1.4
@@ -1,14 +1,14 @@
# Copyright 2003 Interchange Development Group (http://www.icdevgroup.org/)
# Licensed under the GNU GPL v2. See file LICENSE for details.
-# $Id: crypt.coretag,v 1.3 2004/09/25 23:40:59 docelic Exp $
+# $Id: crypt.coretag,v 1.4 2005/02/14 00:42:52 docelic Exp $
-UserTag crypt Order value salt
+UserTag crypt Order value salt
UserTag crypt attrAlias password value
UserTag crypt attrAlias crypted salt
-UserTag crypt Routine <<EOR
+UserTag crypt Version $Revision: 1.4 $
+UserTag crypt Routine <<EOR
sub {
my ($string, $salt) = @_;
return crypt($string, $salt ? $salt : Vend::Util::random_string(2))
}
EOR
-
1.3 +9 -5 interchange/code/UI_Tag/db_columns.coretag
rev 1.3, prev_rev 1.2
Index: db_columns.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/db_columns.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- db_columns.coretag 4 Feb 2002 23:35:36 -0000 1.2
+++ db_columns.coretag 14 Feb 2005 00:42:52 -0000 1.3
@@ -1,7 +1,12 @@
-UserTag db_columns Order name columns joiner passed_order
-UserTag db_columns AttrAlias table name
-UserTag db_columns AttrAlias fields columns
-UserTag db_columns Routine <<EOR
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: db_columns.coretag,v 1.3 2005/02/14 00:42:52 docelic Exp $
+
+UserTag db_columns Order name columns joiner passed_order
+UserTag db_columns AttrAlias table name
+UserTag db_columns AttrAlias fields columns
+UserTag db_columns Version $Revision: 1.3 $
+UserTag db_columns Routine <<EOR
sub {
my ($table,$columns, $joiner, $passed_order) = @_;
$table = $Values->{mv_data_table}
@@ -51,4 +56,3 @@
return join $joiner, @cols;
}
EOR
-
1.3 +8 -3 interchange/code/UI_Tag/db_hash.coretag
rev 1.3, prev_rev 1.2
Index: db_hash.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/db_hash.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- db_hash.coretag 16 Sep 2002 23:06:31 -0000 1.2
+++ db_hash.coretag 14 Feb 2005 00:42:52 -0000 1.3
@@ -1,7 +1,12 @@
-UserTag db-hash Order table column key
-UserTag db-hash PosNumber 3
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: db_hash.coretag,v 1.3 2005/02/14 00:42:52 docelic Exp $
+
+UserTag db-hash Order table column key
+UserTag db-hash PosNumber 3
UserTag db-hash addAttr
-UserTag db-hash Routine <<EOR
+UserTag db-hash Version $Revision: 1.3 $
+UserTag db-hash Routine <<EOR
sub {
my($table, $col, $key, $opt) = @_;
$col =~ s/:+(.*)//s;
1.2 +8 -3 interchange/code/UI_Tag/diff.coretag
rev 1.2, prev_rev 1.1
Index: diff.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/diff.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- diff.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ diff.coretag 14 Feb 2005 00:42:52 -0000 1.2
@@ -1,7 +1,12 @@
-UserTag diff Order current previous
-UserTag diff attrAlias curr current prev previous
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: diff.coretag,v 1.2 2005/02/14 00:42:52 docelic Exp $
+
+UserTag diff Order current previous
+UserTag diff attrAlias curr current prev previous
UserTag diff addAttr
-UserTag diff Routine <<EOR
+UserTag diff Version $Revision: 1.2 $
+UserTag diff Routine <<EOR
sub {
my ($curr, $prev, $opt) = @_;
1.2 +8 -3 interchange/code/UI_Tag/diffmerge.coretag
rev 1.2, prev_rev 1.1
Index: diffmerge.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/diffmerge.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- diffmerge.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ diffmerge.coretag 14 Feb 2005 00:42:52 -0000 1.2
@@ -1,3 +1,7 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: diffmerge.coretag,v 1.2 2005/02/14 00:42:52 docelic Exp $
+
# This tag uses GNU diff3 to merge two texts blocks that were
# modified from the same ancestral text together, and marks
# conflicts that may appear. This is similar to CVS's merging
@@ -35,16 +39,17 @@
# safe_data=1
# ][scratch new_pagebody][/diffmerge]
-UserTag diffmerge Interpolate 1
+UserTag diffmerge Interpolate 1
UserTag diffmerge hasEndTag
UserTag diffmerge addAttr
+UserTag diffmerge Version $Revision: 1.2 $
# These designations come from the diff3 manpage.
# It seemed easier to use their names than to make up new ones.
UserTag diffmerge Order yours older mine
# But here I try to make up new ones anyway. :)
-UserTag diffmerge attrAlias <<EOA
+UserTag diffmerge attrAlias <<EOA
current mine
curr mine
previous yours
@@ -52,7 +57,7 @@
old older
EOA
-UserTag diffmerge Routine <<EOR
+UserTag diffmerge Routine <<EOR
sub {
my ($yours, $older, $mine, $opt, $body) = @_;
1.2 +7 -4 interchange/code/UI_Tag/directive_value.coretag
rev 1.2, prev_rev 1.1
Index: directive_value.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/directive_value.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- directive_value.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ directive_value.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,7 +1,11 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: directive_value.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
-UserTag directive_value order name unparse
-UserTag directive_value PosNumber 2
-UserTag directive_value Routine <<EOR
+UserTag directive_value order name unparse
+UserTag directive_value PosNumber 2
+UserTag directive_value Version $Revision: 1.2 $
+UserTag directive_value Routine <<EOR
sub {
my($name,$unparse) = @_;
my ($value, $parsed) = UI::Primitive::read_directive($name);
@@ -12,4 +16,3 @@
return ($parsed || $value);
}
EOR
-
1.12 +15 -10 interchange/code/UI_Tag/display.coretag
rev 1.12, prev_rev 1.11
Index: display.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/display.coretag,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -r1.11 -r1.12
--- display.coretag 25 Jan 2005 17:40:31 -0000 1.11
+++ display.coretag 14 Feb 2005 00:42:53 -0000 1.12
@@ -1,11 +1,16 @@
-UserTag display Order table column key
-UserTag display attrAlias base table
-UserTag display attrAlias database db
-UserTag display attrAlias col column
-UserTag display attrAlias row key
-UserTag display attrAlias code key
-UserTag display addAttr 1
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: display.coretag,v 1.12 2005/02/14 00:42:53 docelic Exp $
+
+UserTag display Order table column key
+UserTag display attrAlias base table
+UserTag display attrAlias database db
+UserTag display attrAlias col column
+UserTag display attrAlias row key
+UserTag display attrAlias code key
+UserTag display addAttr 1
UserTag display Interpolate 1
-UserTag display posNumber 3
-Require Module Vend::Table::Editor
-UserTag display MapRoutine Vend::Table::Editor::display
+UserTag display posNumber 3
+Require Module Vend::Table::Editor
+UserTag display Version $Revision: 1.12 $
+UserTag display MapRoutine Vend::Table::Editor::display
1.6 +7 -3 interchange/code/UI_Tag/dump_session.coretag
rev 1.6, prev_rev 1.5
Index: dump_session.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/dump_session.coretag,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- dump_session.coretag 10 Feb 2003 19:36:02 -0000 1.5
+++ dump_session.coretag 14 Feb 2005 00:42:53 -0000 1.6
@@ -1,7 +1,11 @@
-UserTag dump_session Order name
-UserTag dump_session AddAttr
-UserTag dump_session Routine <<EOR
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: dump_session.coretag,v 1.6 2005/02/14 00:42:53 docelic Exp $
+UserTag dump_session Order name
+UserTag dump_session AddAttr
+UserTag dump_session Version $Revision: 1.6 $
+UserTag dump_session Routine <<EOR
sub show_part {
my ($ref, $key) = @_;
return $ref unless $key;
1.2 +7 -3 interchange/code/UI_Tag/export_database.coretag
rev 1.2, prev_rev 1.1
Index: export_database.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/export_database.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- export_database.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ export_database.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,6 +1,11 @@
-UserTag export-database Order table file type
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: export_database.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag export-database Order table file type
UserTag export-database addAttr
-UserTag export-database Routine <<EOR
+UserTag export-database Version $Revision: 1.2 $
+UserTag export-database Routine <<EOR
sub {
my($table, $file, $type, $opt) = @_;
delete $::Values->{ui_export_database}
@@ -34,4 +39,3 @@
);
}
EOR
-
1.2 +8 -4 interchange/code/UI_Tag/file_info.coretag
rev 1.2, prev_rev 1.1
Index: file_info.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/file_info.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- file_info.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ file_info.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,7 +1,12 @@
-UserTag file-info Order name
-UserTag file-info attrAlias file name
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: file_info.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag file-info Order name
+UserTag file-info attrAlias file name
UserTag file-info addAttr
-UserTag file-info Routine <<EOR
+UserTag file-info Version $Revision: 1.2 $
+UserTag file-info Routine <<EOR
sub {
my ($fn, $opt) = @_;
if($opt->{server}) {
@@ -45,4 +50,3 @@
$Tag->time($Scratch->{mv_locale},{time => $stat[9], gmt => $opt->{gmt}},$opt->{fmt});
}
EOR
-
1.14 +7 -2 interchange/code/UI_Tag/file_navigator.coretag
rev 1.14, prev_rev 1.13
Index: file_navigator.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/file_navigator.coretag,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -r1.13 -r1.14
--- file_navigator.coretag 14 Feb 2004 13:09:13 -0000 1.13
+++ file_navigator.coretag 14 Feb 2005 00:42:53 -0000 1.14
@@ -1,6 +1,11 @@
-UserTag file-navigator Order mask
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: file_navigator.coretag,v 1.14 2005/02/14 00:42:53 docelic Exp $
+
+UserTag file-navigator Order mask
UserTag file-navigator addAttr
-UserTag file-navigator Routine <<EOR
+UserTag file-navigator Version $Revision: 1.14 $
+UserTag file-navigator Routine <<EOR
use vars qw/$CGI $Session $Tag $Scratch/;
eval {
require Fcntl;
1.4 +6 -1 interchange/code/UI_Tag/filters.coretag
rev 1.4, prev_rev 1.3
Index: filters.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/filters.coretag,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- filters.coretag 19 Sep 2002 17:52:34 -0000 1.3
+++ filters.coretag 14 Feb 2005 00:42:53 -0000 1.4
@@ -1,3 +1,8 @@
-UserTag filters Order exclude
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: filters.coretag,v 1.4 2005/02/14 00:42:53 docelic Exp $
+
+UserTag filters Order exclude
UserTag filters addAttr
+UserTag filters Version $Revision: 1.4 $
UserTag filters MapRoutine Vend::Table::Editor::filters
1.12 +7 -2 interchange/code/UI_Tag/flex_select.coretag
rev 1.12, prev_rev 1.11
Index: flex_select.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/flex_select.coretag,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -r1.11 -r1.12
--- flex_select.coretag 11 Feb 2005 04:17:15 -0000 1.11
+++ flex_select.coretag 14 Feb 2005 00:42:53 -0000 1.12
@@ -1,8 +1,13 @@
-UserTag flex-select Order table
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: flex_select.coretag,v 1.12 2005/02/14 00:42:53 docelic Exp $
+
+UserTag flex-select Order table
UserTag flex-select addAttr
UserTag flex-select attrAlias ml height
UserTag flex-select hasEndTag
-UserTag flex-select Routine <<EOR
+UserTag flex-select Version $Revision: 1.12 $
+UserTag flex-select Routine <<EOR
use vars qw/$CGI $Tmp $Tag/;
my @fs_more = qw/
help_name
1.3 +7 -2 interchange/code/UI_Tag/get_gpg_keys.coretag
rev 1.3, prev_rev 1.2
Index: get_gpg_keys.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/get_gpg_keys.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- get_gpg_keys.coretag 7 Feb 2002 02:40:23 -0000 1.2
+++ get_gpg_keys.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,6 +1,11 @@
-UserTag get-gpg-keys Order dir
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: get_gpg_keys.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag get-gpg-keys Order dir
UserTag get-gpg-keys addAttr
-UserTag get-gpg-keys Routine <<EOR
+UserTag get-gpg-keys Version $Revision: 1.3 $
+UserTag get-gpg-keys Routine <<EOR
sub {
my ($dir, $opt) = @_;
my $gpgexe = $Global::Variable->{GPG_PATH} || 'gpg';
1.3 +6 -2 interchange/code/UI_Tag/global_value.coretag
rev 1.3, prev_rev 1.2
Index: global_value.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/global_value.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- global_value.coretag 14 Jan 2003 02:25:50 -0000 1.2
+++ global_value.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,4 +1,9 @@
-UserTag global-value Order name
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: global_value.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag global-value Order name
+UserTag global-value Version $Revision: 1.3 $
UserTag global-value Routine <<EOR
sub {
my $thing = shift;
@@ -7,4 +12,3 @@
return ${$thing};
}
EOR
-
1.2 +7 -3 interchange/code/UI_Tag/grep_mm.coretag
rev 1.2, prev_rev 1.1
Index: grep_mm.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/grep_mm.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- grep_mm.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ grep_mm.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,8 +1,13 @@
-UserTag grep-mm Order function
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: grep_mm.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag grep-mm Order function
UserTag grep-mm addAttr
UserTag grep-mm Interpolate
UserTag grep-mm hasEndTag
-UserTag grep-mm Routine <<EOR
+UserTag grep-mm Version $Revision: 1.2 $
+UserTag grep-mm Routine <<EOR
sub {
my($func, $opt, $text) = @_;
#::logDebug("grep-mm record: " . Vend::Util::uneval_it(\@_));
@@ -13,4 +18,3 @@
return join "\n", UI::Primitive::ui_acl_grep($acl, $func, @items);
}
EOR
-
1.4 +7 -4 interchange/code/UI_Tag/if_mm.coretag
rev 1.4, prev_rev 1.3
Index: if_mm.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/if_mm.coretag,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- if_mm.coretag 27 Jul 2003 04:30:54 -0000 1.3
+++ if_mm.coretag 14 Feb 2005 00:42:53 -0000 1.4
@@ -1,9 +1,13 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: if_mm.coretag,v 1.4 2005/02/14 00:42:53 docelic Exp $
-UserTag if-mm Order function name
+UserTag if-mm Order function name
UserTag if-mm addAttr
-UserTag if-mm attrAlias key name
+UserTag if-mm attrAlias key name
UserTag if-mm hasEndTag
-UserTag if-mm Routine <<EOR
+UserTag if-mm Version $Revision: 1.4 $
+UserTag if-mm Routine <<EOR
sub {
my($func, $field, $opt, $text) = @_;
@@ -184,4 +188,3 @@
: Vend::Interpolate::pull_else($text, $reverse);
}
EOR
-
1.3 +7 -3 interchange/code/UI_Tag/image_collate.coretag
rev 1.3, prev_rev 1.2
Index: image_collate.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/image_collate.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- image_collate.coretag 4 Feb 2002 01:31:17 -0000 1.2
+++ image_collate.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,6 +1,11 @@
-UserTag image-collate Order archive
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: image_collate.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag image-collate Order archive
UserTag image-collate addAttr
-UserTag image-collate Routine <<EOR
+UserTag image-collate Version $Revision: 1.3 $
+UserTag image-collate Routine <<EOR
sub {
my ($archive, $opt) = @_;
@@ -201,4 +206,3 @@
return $out;
}
EOR
-
1.11 +6 -3 interchange/code/UI_Tag/import_fields.coretag
rev 1.11, prev_rev 1.10
Index: import_fields.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/import_fields.coretag,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -r1.10 -r1.11
--- import_fields.coretag 11 Apr 2004 16:34:50 -0000 1.10
+++ import_fields.coretag 14 Feb 2005 00:42:53 -0000 1.11
@@ -1,6 +1,10 @@
-UserTag import_fields Order table
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: import_fields.coretag,v 1.11 2005/02/14 00:42:53 docelic Exp $
+
+UserTag import_fields Order table
UserTag import_fields addAttr
-UserTag import_fields Version $Revision: 1.10 $
+UserTag import_fields Version $Revision: 1.11 $
UserTag import_fields Routine <<EOR
sub {
my($table, $opt) = @_;
@@ -446,4 +450,3 @@
return;
}
EOR
-
1.6 +3 -3 interchange/code/UI_Tag/jsq.coretag
rev 1.6, prev_rev 1.5
Index: jsq.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/jsq.coretag,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- jsq.coretag 8 Nov 2004 18:27:54 -0000 1.5
+++ jsq.coretag 14 Feb 2005 00:42:53 -0000 1.6
@@ -1,12 +1,13 @@
# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
# Licensed under the GNU GPL v2. See file LICENSE for details.
-# $Id: jsq.coretag,v 1.5 2004/11/08 18:27:54 mheins Exp $
+# $Id: jsq.coretag,v 1.6 2005/02/14 00:42:53 docelic Exp $
UserTag jsquote Alias jsq
UserTag jsq hasEndTag
UserTag jsq NoReparse
UserTag jsq PosNumber 0
-UserTag jsq Routine <<EOR
+UserTag jsq Version $Revision: 1.6 $
+UserTag jsq Routine <<EOR
sub {
my $text = shift;
$text =~ s/^[ \t\r]*\n//;
@@ -23,4 +24,3 @@
return join (" +\n", @lines);
}
EOR
-
1.5 +3 -3 interchange/code/UI_Tag/jsqn.coretag
rev 1.5, prev_rev 1.4
Index: jsqn.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/jsqn.coretag,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- jsqn.coretag 8 Nov 2004 18:27:54 -0000 1.4
+++ jsqn.coretag 14 Feb 2005 00:42:53 -0000 1.5
@@ -1,11 +1,12 @@
# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
# Licensed under the GNU GPL v2. See file LICENSE for details.
-# $Id: jsqn.coretag,v 1.4 2004/11/08 18:27:54 mheins Exp $
+# $Id: jsqn.coretag,v 1.5 2005/02/14 00:42:53 docelic Exp $
UserTag jsqn hasEndTag
UserTag jsqn NoReparse
UserTag jsqn PosNumber 0
-UserTag jsqn Routine <<EOR
+UserTag jsqn Version $Revision: 1.5 $
+UserTag jsqn Routine <<EOR
sub {
my $text = shift;
$text =~ s/^[ \t\r]*\n//;
@@ -22,4 +23,3 @@
return join (" +\n", @lines);
}
EOR
-
1.3 +6 -2 interchange/code/UI_Tag/list_databases.coretag
rev 1.3, prev_rev 1.2
Index: list_databases.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/list_databases.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- list_databases.coretag 4 Feb 2002 23:35:36 -0000 1.2
+++ list_databases.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,4 +1,9 @@
-UserTag list-databases Order nohide extended
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: list_databases.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag list-databases Order nohide extended
+UserTag list-databases Version $Revision: 1.3 $
UserTag list-databases routine <<EOR
sub {
my $nohide = shift;
@@ -36,4 +41,3 @@
return $string;
}
EOR
-
1.2 +8 -4 interchange/code/UI_Tag/list_glob.coretag
rev 1.2, prev_rev 1.1
Index: list_glob.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/list_glob.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- list_glob.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ list_glob.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,9 +1,13 @@
-UserTag list_glob Order spec prefix
-UserTag list_glob PosNumber 2
-UserTag list_glob Routine <<EOR
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: list_glob.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag list_glob Order spec prefix
+UserTag list_glob PosNumber 2
+UserTag list_glob Version $Revision: 1.2 $
+UserTag list_glob Routine <<EOR
sub {
my @files = UI::Primitive::list_glob(@_);
return (wantarray ? @files : join "\n", @files);
}
EOR
-
1.3 +7 -3 interchange/code/UI_Tag/list_keys.coretag
rev 1.3, prev_rev 1.2
Index: list_keys.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/list_keys.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- list_keys.coretag 4 Feb 2002 23:35:36 -0000 1.2
+++ list_keys.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,6 +1,11 @@
-UserTag list-keys Order table
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: list_keys.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag list-keys Order table
UserTag list-keys addAttr
-UserTag list-keys Routine <<EOR
+UserTag list-keys Version $Revision: 1.3 $
+UserTag list-keys Routine <<EOR
sub {
my $table = shift;
#::logDebug("list-keys $table");
@@ -66,4 +71,3 @@
return join("\n", @keys);
}
EOR
-
1.2 +6 -2 interchange/code/UI_Tag/list_pages.coretag
rev 1.2, prev_rev 1.1
Index: list_pages.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/list_pages.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- list_pages.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ list_pages.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,5 +1,10 @@
-UserTag list_pages Order options
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: list_pages.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag list_pages Order options
UserTag list_pages addAttr
+UserTag list_pages Version $Revision: 1.2 $
UserTag list_pages Routine <<EOR
sub {
my ($return_options, $opt) = @_;
@@ -16,4 +21,3 @@
}
}
EOR
-
1.7 +7 -4 interchange/code/UI_Tag/menu_load.coretag
rev 1.7, prev_rev 1.6
Index: menu_load.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/menu_load.coretag,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- menu_load.coretag 16 Jul 2004 18:43:18 -0000 1.6
+++ menu_load.coretag 14 Feb 2005 00:42:53 -0000 1.7
@@ -1,7 +1,11 @@
-UserTag menu-load Order type
-UserTag menu-load addAttr
-UserTag menu-load Routine <<EOR
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: menu_load.coretag,v 1.7 2005/02/14 00:42:53 docelic Exp $
+UserTag menu-load Order type
+UserTag menu-load addAttr
+UserTag menu-load Version $Revision: 1.7 $
+UserTag menu-load Routine <<EOR
sub old_link {
my ($row, $nrow) = @_;
#Debug("row link_type='$row->{link_type}'");
@@ -558,4 +562,3 @@
return join "\n", @out, '';
}
EOR
-
1.2 +7 -2 interchange/code/UI_Tag/meta_info.coretag
rev 1.2, prev_rev 1.1
Index: meta_info.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/meta_info.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- meta_info.coretag 11 Apr 2003 23:56:05 -0000 1.1
+++ meta_info.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,7 +1,12 @@
-UserTag meta-info Order table column key
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: meta_info.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag meta-info Order table column key
UserTag meta-info attrAlias col column
UserTag meta-info addAttr
-UserTag meta-info Routine <<EOR
+UserTag meta-info Version $Revision: 1.2 $
+UserTag meta-info Routine <<EOR
sub {
my ($table, $col, $key, $opt) = @_;
1.3 +6 -1 interchange/code/UI_Tag/meta_record.coretag
rev 1.3, prev_rev 1.2
Index: meta_record.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/meta_record.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- meta_record.coretag 19 Sep 2002 17:52:34 -0000 1.2
+++ meta_record.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,3 +1,8 @@
-UserTag meta-record Order item view source
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: meta_record.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag meta-record Order item view source
UserTag meta-record attrAlias table item
+UserTag meta-record Version $Revision: 1.3 $
UserTag meta-record MapRoutine Vend::Table::Editor::meta_record
1.3 +5 -0 interchange/code/UI_Tag/mm_locale.coretag
rev 1.3, prev_rev 1.2
Index: mm_locale.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/mm_locale.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- mm_locale.coretag 1 May 2003 22:27:42 -0000 1.2
+++ mm_locale.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,3 +1,8 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: mm_locale.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag mm_locale Version $Revision: 1.3 $
UserTag mm_locale Routine <<EOR
sub {
my $locale = $Values->{ui_locale} || $Tag->var('UI_LOCALE', 2);
1.2 +7 -3 interchange/code/UI_Tag/mm_value.coretag
rev 1.2, prev_rev 1.1
Index: mm_value.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/mm_value.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- mm_value.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ mm_value.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,6 +1,11 @@
-UserTag mm-value Order field table
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: mm_value.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag mm-value Order field table
UserTag mm-value addAttr
-UserTag mm-value Routine <<EOR
+UserTag mm-value Version $Revision: 1.2 $
+UserTag mm-value Routine <<EOR
sub {
my($field, $table, $opt, $text) = @_;
@@ -43,4 +48,3 @@
}
}
EOR
-
1.2 +7 -3 interchange/code/UI_Tag/newer.coretag
rev 1.2, prev_rev 1.1
Index: newer.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/newer.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- newer.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ newer.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,5 +1,10 @@
-UserTag newer Order source target
-UserTag newer Routine <<EOR
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: newer.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag newer Order source target
+UserTag newer Version $Revision: 1.2 $
+UserTag newer Routine <<EOR
sub {
my ($source, $file2) = @_;
my $file1 = $source;
@@ -27,4 +32,3 @@
return 0;
}
EOR
-
1.2 +7 -3 interchange/code/UI_Tag/quick_table.coretag
rev 1.2, prev_rev 1.1
Index: quick_table.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/quick_table.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- quick_table.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ quick_table.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,7 +1,12 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: quick_table.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag quick_table Order border
UserTag quick_table HasEndTag
UserTag quick_table Interpolate
-UserTag quick_table Order border
-UserTag quick_table Routine <<EOR
+UserTag quick_table Version $Revision: 1.2 $
+UserTag quick_table Routine <<EOR
sub {
my ($border,$input) = @_;
$border = " BORDER=$border" if $border;
@@ -22,4 +27,3 @@
$out .= '</TABLE>';
}
EOR
-
1.2 +8 -4 interchange/code/UI_Tag/read_shipping.coretag
rev 1.2, prev_rev 1.1
Index: read_shipping.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/read_shipping.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- read_shipping.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ read_shipping.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,7 +1,12 @@
-UserTag read-shipping Order file
-UserTag read-shipping PosNumber 1
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: read_shipping.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag read-shipping Order file
+UserTag read-shipping PosNumber 1
UserTag read-shipping addAttr
-UserTag read-shipping Routine <<EOR
+UserTag read-shipping Version $Revision: 1.2 $
+UserTag read-shipping Routine <<EOR
sub {
my ($file, $opt) = @_;
my $status = read_shipping($file, $opt);
@@ -17,4 +22,3 @@
return $status;
}
EOR
-
1.3 +6 -2 interchange/code/UI_Tag/reconfig.coretag
rev 1.3, prev_rev 1.2
Index: reconfig.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/reconfig.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- reconfig.coretag 14 Jan 2003 02:25:50 -0000 1.2
+++ reconfig.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,4 +1,9 @@
-UserTag reconfig Order name table file
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: reconfig.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag reconfig Order name table file
+UserTag reconfig Version $Revision: 1.3 $
UserTag reconfig Routine <<EOR
use strict;
sub {
@@ -29,4 +34,3 @@
return 1;
}
EOR
-
1.2 +6 -3 interchange/code/UI_Tag/reconfig_time.coretag
rev 1.2, prev_rev 1.1
Index: reconfig_time.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/reconfig_time.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- reconfig_time.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ reconfig_time.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,4 +1,9 @@
-UserTag reconfig-time Order name
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: reconfig_time.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag reconfig-time Order name
+UserTag reconfig-time Version $Revision: 1.2 $
UserTag reconfig-time Routine <<EOR
sub {
my $name = shift || $Vend::Cfg->{CatalogName};
@@ -7,5 +12,3 @@
return Vend::Util::readfile($Global::RunDir . '/status.' . $name);
}
EOR
-
-
1.2 +7 -3 interchange/code/UI_Tag/return_to.coretag
rev 1.2, prev_rev 1.1
Index: return_to.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/return_to.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- return_to.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ return_to.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,6 +1,11 @@
-UserTag return_to Order type table_hack
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: return_to.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag return_to Order type table_hack
UserTag return_to addAttr
-UserTag return_to Routine <<EOR
+UserTag return_to Version $Revision: 1.2 $
+UserTag return_to Routine <<EOR
sub {
use vars qw/$Tag/;
my ($type, $tablehack, $opt) = @_;
@@ -91,4 +96,3 @@
return $out;
}
EOR
-
1.2 +10 -6 interchange/code/UI_Tag/rotate_table.coretag
rev 1.2, prev_rev 1.1
Index: rotate_table.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/rotate_table.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- rotate_table.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ rotate_table.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,8 +1,13 @@
-UserTag rotate-table Order rotate
-UserTag rotate-table PosNumber 1
-UserTag rotate-table Interpolate 1
-UserTag rotate-table HasEndTag 1
-UserTag rotate-table Routine <<EOR
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: rotate_table.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag rotate-table Order rotate
+UserTag rotate-table PosNumber 1
+UserTag rotate-table Interpolate 1
+UserTag rotate-table HasEndTag 1
+UserTag rotate-table Version $Revision: 1.2 $
+UserTag rotate-table Routine <<EOR
sub {
my ($rotate, $text) = @_;
return $text unless $rotate;
@@ -55,4 +60,3 @@
return $out . $rotated . $text;
}
EOR
-
1.10 +7 -4 interchange/code/UI_Tag/row_edit.coretag
rev 1.10, prev_rev 1.9
Index: row_edit.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/row_edit.coretag,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- row_edit.coretag 19 Mar 2004 11:27:08 -0000 1.9
+++ row_edit.coretag 14 Feb 2005 00:42:53 -0000 1.10
@@ -1,9 +1,13 @@
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: row_edit.coretag,v 1.10 2005/02/14 00:42:53 docelic Exp $
+
+UserTag row-edit Order key table size columns
UserTag row-edit HasEndTag
-UserTag row-edit Order key table size columns
UserTag row-edit addAttr
UserTag row-edit Interpolate 1
-UserTag row-edit Version $Revision: 1.9 $
-UserTag row-edit Routine <<EOR
+UserTag row-edit Version $Revision: 1.10 $
+UserTag row-edit Routine <<EOR
sub {
my ($key,$table,$size,$columns,$opt) = @_;
use vars qw/$CGI $Values $Variable/;
@@ -165,4 +169,3 @@
}
EOR
-
1.2 +6 -1 interchange/code/UI_Tag/run_profile.coretag
rev 1.2, prev_rev 1.1
Index: run_profile.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/run_profile.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- run_profile.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ run_profile.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,5 +1,10 @@
-UserTag run-profile Order check cgi profile
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: run_profile.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag run-profile Order check cgi profile
UserTag run-profile addAttr
+UserTag run-profile Version $Revision: 1.2 $
UserTag run-profile Routine <<EOR
sub {
my ($check, $cgi, $profile, $opt) = @_;
1.6 +9 -4 interchange/code/UI_Tag/su.coretag
rev 1.6, prev_rev 1.5
Index: su.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/su.coretag,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- su.coretag 11 Apr 2003 23:51:40 -0000 1.5
+++ su.coretag 14 Feb 2005 00:42:53 -0000 1.6
@@ -1,8 +1,13 @@
-UserTag su Description Switch User Tag for catalog superuser
-UserTag su Order username
-UserTag su attrAlias user username
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: su.coretag,v 1.6 2005/02/14 00:42:53 docelic Exp $
+
+UserTag su Description Switch User Tag for catalog superuser
+UserTag su Order username
+UserTag su attrAlias user username
UserTag su addAttr
-UserTag su Routine <<EOR
+UserTag su Version $Revision: 1.6 $
+UserTag su Routine <<EOR
sub {
my ($user, $opt) = @_;
use vars qw/$Session $Tag $ready_safe $Scratch/;
1.2 +7 -2 interchange/code/UI_Tag/substitute_file.coretag
rev 1.2, prev_rev 1.1
Index: substitute_file.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/substitute_file.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- substitute_file.coretag 29 Jan 2002 05:52:40 -0000 1.1
+++ substitute_file.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,7 +1,12 @@
-UserTag substitute_file Order file
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: substitute_file.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag substitute_file Order file
UserTag substitute_file addAttr
UserTag substitute_file hasEndTag
-UserTag substitute_file Routine <<EOR
+UserTag substitute_file Version $Revision: 1.2 $
+UserTag substitute_file Routine <<EOR
## This is a stupid thing to make 5.6.1 and File::Copy
## compatible with Safe
require File::Copy;
1.4 +7 -5 interchange/code/UI_Tag/tabbed_display.coretag
rev 1.4, prev_rev 1.3
Index: tabbed_display.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/tabbed_display.coretag,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- tabbed_display.coretag 20 Aug 2003 22:38:33 -0000 1.3
+++ tabbed_display.coretag 14 Feb 2005 00:42:53 -0000 1.4
@@ -1,8 +1,13 @@
-UserTag tabbed-display PosNumber 0
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: tabbed_display.coretag,v 1.4 2005/02/14 00:42:53 docelic Exp $
+
+UserTag tabbed-display PosNumber 0
UserTag tabbed-display addAttr
UserTag tabbed-display hasEndTag
UserTag tabbed-display Interpolate
UserTag tabbed-display NoReparse
+UserTag tabbed-display Version $Revision: 1.4 $
UserTag tabbed-display Documentation <<EOD
=head1 NAME
@@ -147,10 +152,8 @@
});
=cut
-
EOD
-
-UserTag tabbed-display Routine <<EOR
+UserTag tabbed-display Routine <<EOR
sub {
my $opt = shift;
my $body = shift;
@@ -201,4 +204,3 @@
return Vend::Table::Editor::tabbed_display($tit, $cont, $opt);
}
EOR
-
1.16 +16 -12 interchange/code/UI_Tag/table_editor.coretag
rev 1.16, prev_rev 1.15
Index: table_editor.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/table_editor.coretag,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -r1.15 -r1.16
--- table_editor.coretag 31 Mar 2003 20:53:30 -0000 1.15
+++ table_editor.coretag 14 Feb 2005 00:42:53 -0000 1.16
@@ -1,17 +1,21 @@
-UserTag table-editor Order mv_data_table item_id
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: table_editor.coretag,v 1.16 2005/02/14 00:42:53 docelic Exp $
+
+UserTag table-editor Order mv_data_table item_id
UserTag table-editor addAttr
-UserTag table-editor AttrAlias clone ui_clone_id
-UserTag table-editor AttrAlias table mv_data_table
-UserTag table-editor AttrAlias fields ui_data_fields
-UserTag table-editor AttrAlias mv_data_fields ui_data_fields
-UserTag table-editor AttrAlias key item_id
-UserTag table-editor AttrAlias view ui_meta_view
-UserTag table-editor AttrAlias profile ui_profile
-UserTag table-editor AttrAlias email_fields ui_display_only
+UserTag table-editor AttrAlias clone ui_clone_id
+UserTag table-editor AttrAlias table mv_data_table
+UserTag table-editor AttrAlias fields ui_data_fields
+UserTag table-editor AttrAlias mv_data_fields ui_data_fields
+UserTag table-editor AttrAlias key item_id
+UserTag table-editor AttrAlias view ui_meta_view
+UserTag table-editor AttrAlias profile ui_profile
+UserTag table-editor AttrAlias email_fields ui_display_only
UserTag table-editor hasEndTag
-UserTag table-editor MapRoutine Vend::Table::Editor::editor
-UserTag table-editor Documentation <<EOD
-
+UserTag table-editor Version $Revision: 1.16 $
+UserTag table-editor MapRoutine Vend::Table::Editor::editor
+UserTag table-editor Documentation <<EOD
Hint: table_editor may not work for tables where the primary key
field is named 'id'.
1.4 +6 -1 interchange/code/UI_Tag/traffic_report.coretag
rev 1.4, prev_rev 1.3
Index: traffic_report.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/traffic_report.coretag,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- traffic_report.coretag 3 Jan 2004 19:34:11 -0000 1.3
+++ traffic_report.coretag 14 Feb 2005 00:42:53 -0000 1.4
@@ -1,5 +1,10 @@
-UserTag traffic-report Order save
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: traffic_report.coretag,v 1.4 2005/02/14 00:42:53 docelic Exp $
+
+UserTag traffic-report Order save
UserTag traffic-report addAttr
+UserTag traffic-report Version $Revision: 1.4 $
UserTag traffic-report Routine <<EOR
sub {
my ($save, $opt) = @_;
1.3 +8 -4 interchange/code/UI_Tag/uneval.coretag
rev 1.3, prev_rev 1.2
Index: uneval.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/uneval.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- uneval.coretag 16 Feb 2002 09:39:08 -0000 1.2
+++ uneval.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,6 +1,11 @@
-UserTag uneval Order name ref
-UserTag uneval PosNumber 1
-UserTag uneval Routine <<EOR
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: uneval.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag uneval Order name ref
+UserTag uneval PosNumber 1
+UserTag uneval Version $Revision: 1.3 $
+UserTag uneval Routine <<EOR
sub {
my ($name, $ref) = @_;
#::logError("args: @_" . Vend::Util::uneval_it(@_));
@@ -10,4 +15,3 @@
return Vend::Util::uneval($ref);
}
EOR
-
1.3 +8 -4 interchange/code/UI_Tag/unlink_file.coretag
rev 1.3, prev_rev 1.2
Index: unlink_file.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/unlink_file.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- unlink_file.coretag 2 Apr 2003 18:59:47 -0000 1.2
+++ unlink_file.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,6 +1,11 @@
-UserTag unlink_file Order name prefix
-UserTag unlink_file PosNumber 2
-UserTag unlink_file Routine <<EOR
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: unlink_file.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag unlink_file Order name prefix
+UserTag unlink_file PosNumber 2
+UserTag unlink_file Version $Revision: 1.3 $
+UserTag unlink_file Routine <<EOR
sub {
my ($file, $prefix) = @_;
#::logDebug("got to unlink: file=$file prefix=$prefix");
@@ -11,4 +16,3 @@
unlink $file;
}
EOR
-
1.10 +6 -2 interchange/code/UI_Tag/update_order_status.tag
rev 1.10, prev_rev 1.9
Index: update_order_status.tag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/update_order_status.tag,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- update_order_status.tag 9 Nov 2003 16:39:52 -0000 1.9
+++ update_order_status.tag 14 Feb 2005 00:42:53 -0000 1.10
@@ -1,6 +1,10 @@
-UserTag update-order-status Order order_number
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: update_order_status.tag,v 1.10 2005/02/14 00:42:53 docelic Exp $
+
+UserTag update-order-status Order order_number
UserTag update-order-status addAttr
-UserTag update-order-status Version $Id: update_order_status.tag,v 1.9 2003/11/09 16:39:52 mheins Exp $
+UserTag update-order-status Version $Revision: 1.10 $
UserTag update-order-status Routine <<EOR
sub {
my ($on, $opt) = @_;
1.9 +7 -2 interchange/code/UI_Tag/version.coretag
rev 1.9, prev_rev 1.8
Index: version.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/version.coretag,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -r1.8 -r1.9
--- version.coretag 7 Jul 2003 00:01:51 -0000 1.8
+++ version.coretag 14 Feb 2005 00:42:53 -0000 1.9
@@ -1,9 +1,14 @@
-UserTag version Order extended
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: version.coretag,v 1.9 2005/02/14 00:42:53 docelic Exp $
+
+UserTag version Order extended
UserTag version attrAlias module_test modtest
UserTag version attrAlias moduletest modtest
UserTag version attrAlias require modtest
UserTag version addAttr
-UserTag version Routine <<EOR
+UserTag version Version $Revision: 1.9 $
+UserTag version Routine <<EOR
sub {
return $::VERSION unless shift;
my $opt = shift;
1.4 +12 -7 interchange/code/UI_Tag/widget.coretag
rev 1.4, prev_rev 1.3
Index: widget.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/widget.coretag,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- widget.coretag 20 Sep 2004 18:36:18 -0000 1.3
+++ widget.coretag 14 Feb 2005 00:42:53 -0000 1.4
@@ -1,12 +1,17 @@
-UserTag widget Order name
-UserTag widget PosNumber 1
-UserTag widget attrAlias db table
-UserTag widget attrAlias column field
-UserTag widget attrAlias outboard key
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: widget.coretag,v 1.4 2005/02/14 00:42:53 docelic Exp $
+
+UserTag widget Order name
+UserTag widget PosNumber 1
+UserTag widget attrAlias db table
+UserTag widget attrAlias column field
+UserTag widget attrAlias outboard key
UserTag widget addAttr
-UserTag widget HasEndTag 1
+UserTag widget HasEndTag 1
UserTag widget Interpolate 1
-UserTag widget Routine <<EOR
+UserTag widget Version $Revision: 1.4 $
+UserTag widget Routine <<EOR
sub {
my($name, $opt, $string) = @_;
#my($name, $type, $value, $table, $column, $key, $data, $string) = @_;
1.2 +6 -1 interchange/code/UI_Tag/widget_meta.coretag
rev 1.2, prev_rev 1.1
Index: widget_meta.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/widget_meta.coretag,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- widget_meta.coretag 21 Jul 2004 05:46:55 -0000 1.1
+++ widget_meta.coretag 14 Feb 2005 00:42:53 -0000 1.2
@@ -1,3 +1,8 @@
-UserTag widget-meta Order type
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: widget_meta.coretag,v 1.2 2005/02/14 00:42:53 docelic Exp $
+
+UserTag widget-meta Order type
UserTag widget-meta addAttr
+UserTag widget-meta Version $Revision: 1.2 $
UserTag widget-meta MapRoutine Vend::Table::Editor::widget_meta
1.7 +7 -7 interchange/code/UI_Tag/write_relative_file.coretag
rev 1.7, prev_rev 1.6
Index: write_relative_file.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/write_relative_file.coretag,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- write_relative_file.coretag 8 Jun 2004 04:11:35 -0000 1.6
+++ write_relative_file.coretag 14 Feb 2005 00:42:53 -0000 1.7
@@ -1,5 +1,8 @@
-UserTag write-relative-file Documentation <<EOD
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: write_relative_file.coretag,v 1.7 2005/02/14 00:42:53 docelic Exp $
+UserTag write-relative-file Documentation <<EOD
=head2 write-relative-file
[write-relative-file file=name]content[/write-relative-file]
@@ -7,15 +10,13 @@
Writes a file C<name> in the catalog directory. C<name> is subject to
file control (e.g. it must be relative), it will return undef if
the check isn't passed.
-
=cut
-
EOD
-
-UserTag write-relative-file Order file
+UserTag write-relative-file Order file
UserTag write-relative-file hasEndTag
UserTag write-relative-file addAttr
-UserTag write-relative-file Routine <<EOR
+UserTag write-relative-file Version $Revision: 1.7 $
+UserTag write-relative-file Routine <<EOR
sub {
my ($file, $opt, $data) = @_;
#::logDebug("writing $file");
@@ -28,4 +29,3 @@
Vend::File::writefile(">$file", $data, $opt);
}
EOR
-
1.3 +8 -3 interchange/code/UI_Tag/write_shipping.coretag
rev 1.3, prev_rev 1.2
Index: write_shipping.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/write_shipping.coretag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- write_shipping.coretag 16 Sep 2002 23:06:31 -0000 1.2
+++ write_shipping.coretag 14 Feb 2005 00:42:53 -0000 1.3
@@ -1,7 +1,12 @@
-UserTag write-shipping Order file
-UserTag write-shipping PosNumber 1
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: write_shipping.coretag,v 1.3 2005/02/14 00:42:53 docelic Exp $
+
+UserTag write-shipping Order file
+UserTag write-shipping PosNumber 1
UserTag write-shipping addAttr
-UserTag write-shipping Routine <<EOR
+UserTag write-shipping Version $Revision: 1.3 $
+UserTag write-shipping Routine <<EOR
sub {
my ($file, $opt) = @_;
if(! $file) {
1.5 +7 -2 interchange/code/UI_Tag/xfer_catalog.coretag
rev 1.5, prev_rev 1.4
Index: xfer_catalog.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/xfer_catalog.coretag,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- xfer_catalog.coretag 5 May 2004 18:49:27 -0000 1.4
+++ xfer_catalog.coretag 14 Feb 2005 00:42:53 -0000 1.5
@@ -1,6 +1,11 @@
-UserTag xfer-catalog Order file
+# Copyright 2002 Interchange Development Group (http://www.icdevgroup.org/)
+# Licensed under the GNU GPL v2. See file LICENSE for details.
+# $Id: xfer_catalog.coretag,v 1.5 2005/02/14 00:42:53 docelic Exp $
+
+UserTag xfer-catalog Order file
UserTag xfer-catalog addAttr
-UserTag xfer-catalog Routine <<EOR
+UserTag xfer-catalog Version $Revision: 1.5 $
+UserTag xfer-catalog Routine <<EOR
sub {
my ($file, $opt) = @_;
my %dsn;
More information about the interchange-cvs
mailing list