Readded macro help. Added 5 user definable fields to wobject table.

This commit is contained in:
JT Smith 2002-08-27 01:34:12 +00:00
parent fdc249cf59
commit c5fc879565
5 changed files with 30 additions and 4 deletions

View file

@ -6937,7 +6937,7 @@ CREATE TABLE webguiVersion (
--
INSERT INTO webguiVersion VALUES ('4.6.3','initial install',unix_timestamp());
INSERT INTO webguiVersion VALUES ('4.6.4','initial install',unix_timestamp());
--
-- Table structure for table 'wobject'
@ -6975,3 +6975,9 @@ CREATE TABLE wobject (
INSERT INTO wobject VALUES (-1,4,'SiteMap',0,'Page Not Found',1,'The page you were looking for could not be found on this system. Perhaps it has been deleted or renamed. The following list is a site map of this site. If you don\'t find what you\'re looking for on the site map, you can always start from the <a href=\"^/;\">Home Page</a>.',1,1001744792,3,1016077239,3,0,1001744792,1336444487,2,3600,4,0,'after');
INSERT INTO wobject VALUES (-2,1,'Article',1,'Welcome to WebGUI!',1,'<DIV>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\">If youre reading this message it means that youve got WebGUI up and running. Good job! The installation is not trivial.</P>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\"> <?xml:namespace prefix = o ns = \"urn:schemas-microsoft-com:office:office\" /><o:p></o:p></P>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\">In order to do anything useful with your new installation youll need to log in as the default administrator account. Follow these steps to get started:</P>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\"> <o:p></o:p></P>\r\n<OL style=\"MARGIN-TOP: 0in\" type=1>\r\n<LI class=MsoNormal style=\"MARGIN: 0in 0in 0pt; mso-list: l1 level1 lfo2; tab-stops: list .5in\"><A href=\"^\\;?op=displayLogin\">Click here to log in.</A> (username: Admin password: 123qwe) \r\n<LI class=MsoNormal style=\"MARGIN: 0in 0in 0pt; mso-list: l1 level1 lfo2; tab-stops: list .5in\"><A href=\"^\\;?op=switchOnAdmin\">Click here to turn the administrative interface on.</A></LI></OL>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\"> Now that youre in as the administrator, you should <A href=\"^\\;?op=displayAccount\">change your password</A> so no one else can log in and mess with your site. You might also want to <A href=\"^\\;?op=addUser\">create another account </A>for yourself with Administrative privileges in case you can\'t log in with the Admin account for some reason.</P>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\"> <o:p></o:p></P>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\">Youll notice three menus at the top of your screen. Those are your administrative menus. Going from left to right they are <I>Content</I>, <I>Clipboard</I>, and <I>Admin</I>. The content menu allows you to add new pages and content to your site. The clipboard menu is currently empty, but if you cut or copy anything from any of your pages, it will end up there. The admin menu controls things like system settings and users.</P>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\"> <o:p></o:p></P>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\">For more information about how to administer WebGUI consider getting a copy of <I><A href=\"http://www.plainblack.com/ruling_webgui\">Ruling WebGUI</A></I>. Plain Black Software also provides several <A href=\"http://www.plainblack.com/support_programs\">Support Programs </A>for WebGUI if you run into trouble.</P>\r\n<P class=MsoNormal style=\"MARGIN: 0in 0in 0pt\"> <o:p></o:p></P>Enjoy your new WebGUI site!\r\n</DIV>',1,1023555430,3,1023555630,3,0,1023512400,1338872400,2,3600,4,0,'after');
alter table wobject add column userDefined1 varchar(255);
alter table wobject add column userDefined2 varchar(255);
alter table wobject add column userDefined3 varchar(255);
alter table wobject add column userDefined4 varchar(255);
alter table wobject add column userDefined5 varchar(255);

View file

@ -6937,7 +6937,7 @@ CREATE TABLE webguiVersion (
--
INSERT INTO webguiVersion VALUES ('4.6.2','initial install',unix_timestamp());
INSERT INTO webguiVersion VALUES ('4.6.3','initial install',unix_timestamp());
--
-- Table structure for table 'wobject'

File diff suppressed because one or more lines are too long

View file

@ -1,5 +1,5 @@
package WebGUI;
our $VERSION = "4.6.3";
our $VERSION = "4.6.4";
#-------------------------------------------------------------------
# WebGUI is Copyright 2001-2002 Plain Black LLC.

View file

@ -226,6 +226,11 @@ sub duplicate {
});
$w->set({
pageId => $pageId,
userDefined1 => $_[0]->get("userDefined1"),
userDefined2 => $_[0]->get("userDefined2"),
userDefined3 => $_[0]->get("userDefined3"),
userDefined4 => $_[0]->get("userDefined4"),
userDefined5 => $_[0]->get("userDefined5"),
title => $_[0]->get("title"),
description => $_[0]->get("description"),
displayTitle => $_[0]->get("displayTitle"),
@ -512,7 +517,7 @@ sub set {
$sql = "update wobject set";
foreach $key (keys %{$_[1]}) {
$_[0]->{_property}{$key} = ${$_[1]}{$key};
if (isIn($key, qw(moderationType groupToModerate groupToPost karmaPerPost editTimeout title displayTitle description processMacros pageId templatePosition startDate endDate sequenceNumber))) {
if (isIn($key, qw(userDefined1 userDefined2 userDefined3 userDefined4 userDefined5 moderationType groupToModerate groupToPost karmaPerPost editTimeout title displayTitle description processMacros pageId templatePosition startDate endDate sequenceNumber))) {
$sql .= " ".$key."=".quote(${$_[1]}{$key}).",";
}
if (isIn($key, @{$_[2]})) {