Index: openacs-4/packages/lars-blogger/www/entry-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/entry-edit.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/lars-blogger/www/entry-edit.tcl	22 Dec 2005 11:01:28 -0000	1.27
+++ openacs-4/packages/lars-blogger/www/entry-edit.tcl	8 Aug 2006 21:26:57 -0000	1.28
@@ -3,6 +3,7 @@
 # is convenient to have them here so people can create custom bookmarks
 # to this page that prefill these values:
 
+
 ad_page_contract {} {
     {entry_id:integer,optional}
     {return_url ""}
@@ -21,9 +22,9 @@
 # need it sooner.
 
 if {[ad_form_new_p -key entry_id]} {
-    set page_title "Add Blog Entry"
+    set page_title "[_ lars-blogger.Add_Blog_Entry]"
 } else {
-    set page_title "Edit Blog Entry"
+    set page_title "[_ lars-blogger.Edit_Blog_Entry]"
 }
 
 set valid_url_example "http://www.example.com/foo"
@@ -33,7 +34,7 @@
     acs_user::get -user_id [ad_conn user_id] -array user_info
     if { [empty_string_p $user_info(screen_name)] } {
 
-        set page_title "Screen Name"
+        set page_title "[_ lars-blogger.Screen_Name]"
         set context [list $page_title]
         set pvt_home_url [ad_pvt_home]
         set pvt_home_name [ad_pvt_home_name]
@@ -54,11 +55,8 @@
             {label Title}
             {html {size 50}}}
         {title_url:text,optional
-            {label "Title URL"}
-            {help_text "If this entry is about a web page you can \
-                put the full URL here, e.g. ${valid_url_example}.  The \
-                title of your entry will then become a hyperlink to \
-                that web page."}
+            {label "[_ lars-blogger.Title_URL]"}
+            {help_text "[_ lars-blogger.lt_If_this_entry_is_abou]"}
             {html {size 50}}
         }
     } \
@@ -92,14 +90,14 @@
 ad_form -extend -name entry -form {
     {content:richtext(richtext)
         {html {cols 80 rows 20}}
-        {label "Content"}
+        {label "[_ lars-blogger.Content]"}
     }
 }
 
 ad_form -extend -name entry -form {
     {entry_date:text
-        {label "Entry date"}
-        {help_text "Format: YYYY-MM-DD HH24:MI:SS"}
+        {label "[_ lars-blogger.Entry_date]"}
+        {help_text "[_ lars-blogger.lt_Format_YYYY-MM-DD_HH2]"}
         {html {size 20}}
         {after_html
             {(<a href="javascript:setEntryDateToToday()">Set to now</a>)}
@@ -111,8 +109,8 @@
 if {$unpublish_p} {
     ad_form -extend -name entry -form {
         {draft_p:text(select)
-            {options {{"Draft" "t"} {"Publish" "f"}}}
-            {label "Post Status"}
+            {options {{"[_ lars-blogger.Draft]" "t"} {"[_ lars-blogger.Publish]" "f"}}}
+            {label "[_ lars-blogger.Post_Status]"}
         }
     }
 } else {
@@ -215,8 +213,7 @@
                 [util_url_valid_p $title_url]
             }
         ]}
-        "Your input \"$title_url\" doesn't look like a valid URL. \
-            Example of a valid URL: $valid_url_example"
+        "[_ lars-blogger.lt_Your_input_title_url_]"
     }}
 
 set context [list $page_title]