Index: openacs-4/packages/static-portlet/static-portlet.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/static-portlet.info,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/static-portlet/static-portlet.info 26 Feb 2002 01:36:44 -0000 1.3
+++ openacs-4/packages/static-portlet/static-portlet.info 4 Mar 2002 22:45:51 -0000 1.4
@@ -38,9 +38,9 @@
-
-
-
+
+
+
Index: openacs-4/packages/static-portlet/tcl/static-admin-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/tcl/static-admin-portlet-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/static-portlet/tcl/static-admin-portlet-procs.tcl 26 Feb 2002 01:36:44 -0000 1.3
+++ openacs-4/packages/static-portlet/tcl/static-admin-portlet-procs.tcl 4 Mar 2002 22:45:51 -0000 1.4
@@ -20,8 +20,7 @@
ad_proc -public get_pretty_name {
} {
-
- return [ad_parameter static_admin_portlet_pretty_name]
+ return [ad_parameter static_admin_portlet_pretty_name static-portlet "Custom Portlet Administration"]
}
ad_proc -private my_package_key {
Index: openacs-4/packages/static-portlet/www/element.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/www/element.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/static-portlet/www/element.adp 18 Feb 2002 05:23:12 -0000 1.1
+++ openacs-4/packages/static-portlet/www/element.adp 4 Mar 2002 22:45:51 -0000 1.2
@@ -1,6 +1,4 @@
@title@
-Edit this element:
-
Index: openacs-4/packages/static-portlet/www/static-admin-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/www/static-admin-portlet.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/static-portlet/www/static-admin-portlet.tcl 26 Feb 2002 01:36:44 -0000 1.4
+++ openacs-4/packages/static-portlet/www/static-admin-portlet.tcl 4 Mar 2002 22:45:51 -0000 1.5
@@ -12,10 +12,9 @@
set instance_id $config(instance_id)
-set element_pretty_name \
- [ad_parameter static_admin_portlet_element_pretty_name]
+set element_pretty_name [ad_parameter static_admin_portlet_element_pretty_name static-portlet "Custom Portlet"]
set element_pretty_plural \
- [ad_parameter static_admin_portlet_element_pretty_plural]
+ [ad_parameter static_admin_portlet_element_pretty_plural static-portlet "Custom Portlets"]
db_multirow content select_content "
Index: openacs-4/packages/static-portlet/www/static-portlet.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/www/static-portlet.adp,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/static-portlet/www/static-portlet.adp 18 Feb 2002 21:20:55 -0000 1.5
+++ openacs-4/packages/static-portlet/www/static-portlet.adp 4 Mar 2002 22:45:51 -0000 1.6
@@ -1,6 +1,6 @@
- @content@
+@content@
Index: openacs-4/packages/static-portlet/www/static-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/static-portlet/www/static-portlet.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/static-portlet/www/static-portlet.tcl 18 Feb 2002 20:23:00 -0000 1.3
+++ openacs-4/packages/static-portlet/www/static-portlet.tcl 4 Mar 2002 22:45:51 -0000 1.4
@@ -11,10 +11,10 @@
# one piece of content only per portlet
set content_id $config(content_id)
-if {[catch {set success_p [db_0or1row select_content {
+set success_p 0
+
+set success_p [db_0or1row select_content {
select content, pretty_name
from static_portal_content
where content_id = :content_id
-}]} errmsg]} {
- set success_p 0
-}
+}]