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

interchange-cvs at icdevgroup.org interchange-cvs at icdevgroup.org
Wed Jul 9 12:26:00 UTC 2008


User:      thunder
Date:      2008-07-09 12:26:00 GMT
Modified:  dist/lib/UI Tag: STABLE_5_6-branch ContentEditor.pm
Log:
reverted change as it causes new pages to not be created anymore

Revision  Changes    Path
No                   revision



No                   revision



2.22.2.1             interchange/dist/lib/UI/ContentEditor.pm


rev 2.22.2.1, prev_rev 2.22
Index: ContentEditor.pm
===================================================================
RCS file: /var/cvs/interchange/dist/lib/UI/ContentEditor.pm,v
retrieving revision 2.22
retrieving revision 2.22.2.1
diff -u -r2.22 -r2.22.2.1
--- ContentEditor.pm	24 Apr 2008 09:07:57 -0000	2.22
+++ ContentEditor.pm	9 Jul 2008 12:26:00 -0000	2.22.2.1
@@ -1,6 +1,6 @@
 # UI::ContentEditor - Interchange page/component edit
 # 
-# $Id: ContentEditor.pm,v 2.22 2008-04-24 09:07:57 thunder Exp $
+# $Id: ContentEditor.pm,v 2.22.2.1 2008-07-09 12:26:00 thunder Exp $
 #
 # Copyright (C) 2002-2007 Interchange Development Group
 # Copyright (C) 1996-2002 Red Hat, Inc.
@@ -22,7 +22,7 @@
 
 package UI::ContentEditor;
 
-$VERSION = substr(q$Revision: 2.22 $, 10);
+$VERSION = substr(q$Revision: 2.22.2.1 $, 10);
 $DEBUG = 0;
 
 use POSIX qw/strftime/;
@@ -2881,12 +2881,7 @@
 
 	save_store('page', $name, $pref);
 
-	## If returns false then must be error or not editable
-	parse_page($pref, $opt)
-		or do {
-			Vend::Tags->error({ name => 'parse_page', set => "Error parsing page." });
-			return;
-		};
+	parse_page($pref, $opt);
 
 	publish_page($pref, $opt) if $opt->{new};
 







More information about the interchange-cvs mailing list