[interchange-cvs] interchange - racke modified 2 files
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Thu Jul 10 14:56:31 UTC 2008
User: racke
Date: 2008-07-10 14:56:31 GMT
Modified: code/UI_Tag run_profile.coretag
Modified: . WHATSNEW-5.7
Log:
[run-profile] removes automatically generated profiles only.
Revision Changes Path
1.6 interchange/code/UI_Tag/run_profile.coretag
rev 1.6, prev_rev 1.5
Index: run_profile.coretag
===================================================================
RCS file: /var/cvs/interchange/code/UI_Tag/run_profile.coretag,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- run_profile.coretag 19 Dec 2007 09:45:30 -0000 1.5
+++ run_profile.coretag 10 Jul 2008 14:56:31 -0000 1.6
@@ -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: run_profile.coretag,v 1.5 2007-12-19 09:45:30 kwalsh Exp $
+# $Id: run_profile.coretag,v 1.6 2008-07-10 14:56:31 racke Exp $
UserTag run-profile Order check cgi profile name
UserTag run-profile addAttr
-UserTag run-profile Version $Revision: 1.5 $
+UserTag run-profile Version $Revision: 1.6 $
UserTag run-profile Routine <<EOR
sub {
my ($check, $cgi, $profile, $name, $opt) = @_;
@@ -37,7 +37,7 @@
my ($status) = ::check_order($pname, $ref);
- delete $::Scratch->{$pname};
+ delete $::Scratch->{$pname} unless $name;
return is_yes($opt->{hide}) ? undef : $status;
}
2.5 interchange/WHATSNEW-5.7
rev 2.5, prev_rev 2.4
Index: WHATSNEW-5.7
===================================================================
RCS file: /var/cvs/interchange/WHATSNEW-5.7,v
retrieving revision 2.4
retrieving revision 2.5
diff -u -r2.4 -r2.5
--- WHATSNEW-5.7 9 Jul 2008 13:54:20 -0000 2.4
+++ WHATSNEW-5.7 10 Jul 2008 14:56:31 -0000 2.5
@@ -25,6 +25,8 @@
* srcliteral attribute added to [button] tag. Setting srcliteral avoids the image existence check for the src attribute.
+* [run-profile] removes automatically generated profiles only.
+
OrderCheck
----------
More information about the interchange-cvs
mailing list