Index: openacs-4/packages/lars-blogger/www/category-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/category-edit.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/lars-blogger/www/category-edit.tcl 11 Dec 2003 21:40:06 -0000 1.6
+++ openacs-4/packages/lars-blogger/www/category-edit.tcl 8 Aug 2006 21:26:57 -0000 1.7
@@ -10,7 +10,7 @@
{short_name:allhtml ""}
}
-set page_title "Manage Categories"
+set page_title "[_ lars-blogger.Manage_Categories]"
set context [list $page_title]
# Must be logged in
@@ -22,7 +22,7 @@
set package_id [ad_conn package_id]
if { [lars_blog_categories_p -package_id $package_id] != 1} {
- ad_return_error "No category support" "Categories are not supported. Modify the package parameters to add support."
+ ad_return_error "[_ lars-blogger.No_category_support]" "[_ lars-blogger.lt_Categories_are_not_su]"
ad_script_abort
}
@@ -39,13 +39,13 @@
ad_form -name category -cancel_url $return_url -form {
{category_id:key}
{name:text
- {label "Category"}
+ {label "[_ lars-blogger.Category]"}
{html { size 50 }}
}
{short_name:text,optional
- {label "Category Short Name"}
+ {label "[_ lars-blogger.Category_Short_Name]"}
{html { size 20 }}
- {help_text "This is used to provide a pretty URL for viewing postings in this category"}
+ {help_text "[_ lars-blogger.lt_This_is_used_to_provi]"}
}
{return_url:text(hidden),optional}
} -new_request {
@@ -59,7 +59,7 @@
if { ![empty_string_p $short_name] } {
db_1row short_name_exists { *SQL* }
if { $short_name_exists > 0 } {
- form set_error category short_name "This short name is already used by another category"
+ form set_error category short_name "[_ lars-blogger.lt_This_short_name_is_al]"
break
}
}
@@ -95,13 +95,13 @@
-name categories \
-multirow categories \
-actions {
- "Add category" "category-edit" "Add new category"
+ "[_ lars-blogger.Add_category]" "category-edit" "[_ lars-blogger.Add_new_category]"
} -elements {
edit {
label {}
- display_template {}
+ display_template {}
link_url_eval {[export_vars -base [ad_conn url] { category_id }]}
- link_html { title "Edit category" }
+ link_html { title "[_ lars-blogger.Edit_category]" }
sub_class narrow
}
name {
@@ -118,9 +118,9 @@
}
delete {
label {}
- display_template {}
+ display_template {}
link_url_eval {[export_vars -base "category-delete" { category_id { return_url [ad_return_url] } }]}
- link_html { title "Delete category" }
+ link_html { title "[_ lars-blogger.Delete_category]" }
sub_class narrow
}
}