[interchange-cvs] interchange - heins modified dist/lib/UI/ContentEditor.pm

interchange-core@icdevgroup.org interchange-core@icdevgroup.org
Mon Sep 2 12:22:01 2002


User:      heins
Date:      2002-09-02 16:21:28 GMT
Modified:  dist/lib/UI ContentEditor.pm
Log:
* Oops. Deleted one too many parameters -- published improperly
  with that change.

Revision  Changes    Path
2.6       +4 -3      interchange/dist/lib/UI/ContentEditor.pm


rev 2.6, prev_rev 2.5
Index: ContentEditor.pm
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
RCS file: /var/cvs/interchange/dist/lib/UI/ContentEditor.pm,v
retrieving revision 2.5
retrieving revision 2.6
diff -u -r2.5 -r2.6
--- ContentEditor.pm	31 Aug 2002 08:13:32 -0000	2.5
+++ ContentEditor.pm	2 Sep 2002 16:21:28 -0000	2.6
@@ -2,7 +2,7 @@
 #
 # UI::ContentEditor - Interchange page/component edit
 #=20
-# $Id: ContentEditor.pm,v 2.5 2002/08/31 08:13:32 mheins Exp $
+# $Id: ContentEditor.pm,v 2.6 2002/09/02 16:21:28 mheins Exp $
 #
 # Copyright (C) 1996-2002 Red Hat, Inc. <interchange@redhat.com>
 #
@@ -23,7 +23,7 @@
=20
 package UI::ContentEditor;
=20
-$VERSION =3D substr(q$Revision: 2.5 $, 10);
+$VERSION =3D substr(q$Revision: 2.6 $, 10);
 $DEBUG =3D 0;
=20
 use POSIX qw/strftime/;
@@ -1421,8 +1421,9 @@
 	my @header;
=20
 	my $slots =3D delete $ref->{ui_slots} || [];
-	push @header, "ui_name: $name";
+	push @header, "ui_$type: $name";
 	push @header, "ui_type: $type";
+	push @header, "ui_name: $name";
 	push @header, "ui_page_template: $ref->{ui_page_template}";
 	push @header, "ui_version: " . $Tag->version();
 	delete $ref->{ui_name};