Index: openacs-4/packages/lars-blogger/www/drafts.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/drafts.tcl,v
diff -u -r1.5 -r1.5.2.1
--- openacs-4/packages/lars-blogger/www/drafts.tcl 11 Dec 2003 21:40:06 -0000 1.5
+++ openacs-4/packages/lars-blogger/www/drafts.tcl 20 Apr 2005 08:23:09 -0000 1.5.2.1
@@ -6,7 +6,7 @@
set package_id [ad_conn package_id]
set user_id [ad_conn user_id]
-set page_title "Draft Entries"
+set page_title "[_ lars-blogger._Draft]"
set context [list $page_title]
@@ -18,22 +18,22 @@
}
link_url_eval {[export_vars -base entry-edit { entry_id { return_url [ad_return_url] } }]}
- link_html { title "Edit entry" }
+ link_html { title "[_ lars-blogger._Edit_1]" }
}
lappend elements title {
- label "Title"
+ label "[_ lars-blogger.Title]"
link_url_eval {[export_vars -base one-entry { entry_id }]}
- link_html { title "Preview entry" }
+ link_html { title "[_ lars-blogger._Preview]" }
}
lappend elements entry_date {
- label "Date"
+ label "[_ lars-blogger.Date]"
display_col entry_date_pretty
}
if { [permission::permission_p -object_id $package_id -privilege write] } {
set statement "all_draft_entries"
lappend elements creation_user {
- label "Author"
+ label "[_ lars-blogger.Author]"
display_template {@entries.first_names@ @entries.last_name@}
link_url_eval {[acs_community_member_url -user_id $creation_user]}
}
@@ -42,7 +42,7 @@
}
lappend elements content {
- label "Content"
+ label "[_ lars-blogger.Content]"
}
lappend elements publish {
label {Publish}
@@ -51,7 +51,7 @@
Publish
}
link_url_eval {[export_vars -base entry-publish { entry_id { return_url [ad_return_url] } }]}
- link_html { title "Publish entry" }
+ link_html { title "[_ lars-blogger._Publish]" }
html { align center }
}
lappend elements delete {
@@ -61,7 +61,7 @@
}
link_url_eval {[export_vars -base entry-delete { entry_id { return_url [ad_return_url] } }]}
- link_html { title "Delete entry" }
+ link_html { title "[_ lars-blogger._Delete_1]" }
}