added new article field "titleAlias", can be used as alternate article title, useful...
authorAdrian Oldham <adriann@visualthought.com.au>
Wed, 8 Aug 2007 06:58:53 +0000 (06:58 +0000)
committeradriann <adriann@45cb6cf1-00bc-42d2-bb5a-07f51df49f94>
Wed, 8 Aug 2007 06:58:53 +0000 (06:58 +0000)
schema/bse.sql
site/cgi-bin/modules/Article.pm
site/cgi-bin/modules/BSE/DB/Mysql.pm
site/docs/config.pod
site/templates/admin/edit_catalog.tmpl
site/templates/admin/edit_product.tmpl
site/templates/admin/edit_seminar.tmpl
site/util/initial.pl

index d63eba9..b643f96 100644 (file)
@@ -94,6 +94,8 @@ CREATE TABLE article (
   -- filter menu value in allkids_of iterators
   menu smallint(5) not null default 0,
   
+  titleAlias varchar(60) not null default '',
+  
   PRIMARY KEY (id),
 
   -- if we keep id in the indexes MySQL will sometimes be able to
index 64e664e..63a87d3 100644 (file)
@@ -15,7 +15,7 @@ sub columns {
     customInt1 customInt2 customInt3 customInt4 
     lastModifiedBy created createdBy author pageTitle
     force_dynamic cached_dynamic inherit_siteuser_rights
-    metaDescription metaKeywords summary menu/;
+    metaDescription metaKeywords summary menu titleAlias/;
 }
 
 sub numeric {
index 97d68ba..5a23a8e 100644 (file)
@@ -18,9 +18,9 @@ my %statements =
   (
    Articles => 'select * from article',
    replaceArticle =>
-     'replace article values (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)',
+     'replace article values (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)',
    addArticle =>  
-     'insert article values (null, ?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)',
+     'insert article values (null, ?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)',
    deleteArticle => 'delete from article where id = ?',
    getArticleByPkey => 'select * from article where id = ?',
    
index e1360e8..1ad3576 100644 (file)
@@ -1529,6 +1529,28 @@ For example:
 
 =back
 
+=head2 [title alias]
+
+Enable the "titleAlias" article field and set which level it will be available.
+
+=over
+
+=item levelI<level>
+
+Where I<level> is the article "level" for which the "titleAlias" field should be enabled.  To enable
+set the value to non-zero.
+
+For example:
+
+  [title alias]
+  level1=1
+
+The "titleAlias" can be used as an alternate "short" title for the given article, especially useful
+for space critical iterated menus.  A template conditional can be used to display the "titleAlias" 
+in place of the article "title" when appropriate.
+
+=back
+
 =head1 AUTHOR
 
 Tony Cook <tony@develop-help.com>
index 5c1af31..dd4182c 100644 (file)
             </td>
             <td nowrap="nowrap" bgcolor="#FFFFFF"><:help catalog title:> <:error_img title:></td>
           </tr>
+          <:if Cfg "title alias" [concatenate level [article level]]:><tr>
+            <th nowrap="nowrap" bgcolor="#FFFFFF" align="left">Alias:</th>
+            <td bgcolor="#FFFFFF" width="100%">
+              <:if FieldPerm titleAlias:><input type="text" name="titleAlias" maxlength="<:cfg fields alias_size 60:>" size="60" value="<:old titleAlias article titleAlias:>" /><:or FieldPerm:><:article titleAlias:><:eif FieldPerm:>
+            </td>
+            <td nowrap="nowrap" bgcolor="#FFFFFF"><:help edit titleAlias:> <:error_img titleAlias:></td>
+          </tr><:or Cfg:><:eif Cfg:>
           <tr> 
             <th valign="top" bgcolor="#FFFFFF" nowrap="nowrap" align="left"> Body:</th>
             <td bgcolor="#FFFFFF" width="100%"> 
index 649eb6c..8fc2f58 100644 (file)
             <td bgcolor="#FFFFFF"><:ifFieldPerm title:><input type="text" name="title" value="<:old title default title:>" size="60"><:or:><:product title:><:eif:> </td>
             <td nowrap="nowrap" bgcolor="#FFFFFF"><:help product title:> <:error_img title:></td>
           </tr>
+          <:if Cfg "title alias" [concatenate level [article level]]:><tr>
+            <th nowrap="nowrap" bgcolor="#FFFFFF" align="left">Alias:</th>
+            <td bgcolor="#FFFFFF" width="100%">
+              <:if FieldPerm titleAlias:><input type="text" name="titleAlias" maxlength="<:cfg fields alias_size 60:>" size="60" value="<:old titleAlias article titleAlias:>" /><:or FieldPerm:><:article titleAlias:><:eif FieldPerm:>
+            </td>
+            <td nowrap="nowrap" bgcolor="#FFFFFF"><:help edit titleAlias:> <:error_img titleAlias:></td>
+          </tr><:or Cfg:><:eif Cfg:>
           <tr> 
             <th nowrap="nowrap" align="left" bgcolor="#FFFFFF">Summary:</th>
             <td nowrap="nowrap" bgcolor="#FFFFFF"><:ifFieldPerm summary:><input type="text" name="summary" value="<:old summary default summary:>" size=60><:or:><:product summary:><:eif:> </td>
index 5dbca9d..a1135ab 100644 (file)
             <td bgcolor="#FFFFFF"><:ifFieldPerm title:><input type="text" name="title" value="<:old title default title:>" size="60" /><:or:><:seminar title:><:eif:> </td>
             <td nowrap="nowrap" bgcolor="#FFFFFF"><:help product title:> <:error_img title:></td>
           </tr>
+          <:if Cfg "title alias" [concatenate level [article level]]:><tr>
+            <th nowrap="nowrap" bgcolor="#FFFFFF" align="left">Alias:</th>
+            <td bgcolor="#FFFFFF" width="100%">
+              <:if FieldPerm titleAlias:><input type="text" name="titleAlias" maxlength="<:cfg fields alias_size 60:>" size="60" value="<:old titleAlias article titleAlias:>" /><:or FieldPerm:><:article titleAlias:><:eif FieldPerm:>
+            </td>
+            <td nowrap="nowrap" bgcolor="#FFFFFF"><:help edit titleAlias:> <:error_img titleAlias:></td>
+          </tr><:or Cfg:><:eif Cfg:>
           <tr> 
             <th nowrap="nowrap" align="left" bgcolor="#FFFFFF">Summary:</th>
             <td nowrap="nowrap" bgcolor="#FFFFFF"><:ifFieldPerm summary:><input type="text" name="summary" value="<:old summary default summary:>" size="60" /><:or:><:seminar summary:><:eif:> </td>
index 5842fd6..7069df4 100644 (file)
@@ -56,6 +56,7 @@ my @prebuilt =
     metaKeywords=>'',
     summary => '',
     menu => 0,
+    titleAlias => '',
    },
    {
     # the invisible subsection for what's hot
@@ -94,6 +95,7 @@ my @prebuilt =
     metaKeywords=>'',
     summary => '',
     menu => 0,
+    titleAlias => '',
    },
    {
     id=>3,
@@ -131,6 +133,7 @@ my @prebuilt =
     metaKeywords=>'',
     summary => '',
     menu => 0,
+    titleAlias => '',
    },
    {
     id=>4,
@@ -168,6 +171,7 @@ my @prebuilt =
     metaKeywords=>'',
     summary => '',
     menu => 0,
+    titleAlias => '',
    },
    {
     id=>5,
@@ -205,6 +209,7 @@ my @prebuilt =
     metaKeywords=>'',
     summary => '',
     menu => 0,
+    titleAlias => '',
    },
    {
     id=>6,
@@ -472,6 +477,7 @@ EOS
     metaKeywords=>'',
     summary => '',
     menu => 0,
+    titleAlias => '',
    },
    {
     id=>7,
@@ -513,6 +519,7 @@ EOS
     metaKeywords=>'',
     summary => '',
     menu => 0,
+    titleAlias => '',
    },
    {
     id=>8,
@@ -554,6 +561,7 @@ EOS
     metaKeywords=>'',
     summary => '',
     menu => 0,
+    titleAlias => '',
    },
   );