- [ New Forum | Administration ]
+ [ #forums.New_Forum# | #forums.Administration# ]
@@ -16,7 +16,7 @@
- Search:
+ #forums.Search_colon#
@@ -29,9 +29,9 @@
- Forum Name
- Threads
- Last Post
+ #forums.Forum_Name#
+ #forums.Threads#
+ #forums.Last_Post#
@@ -69,10 +69,14 @@
- No Forums
+ #forums.No_Forums#
+
+
+
+
Index: openacs-4/packages/forums/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/index.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/forums/www/index.tcl 10 Sep 2002 22:22:56 -0000 1.6
+++ openacs-4/packages/forums/www/index.tcl 25 Oct 2002 13:00:02 -0000 1.7
@@ -35,3 +35,6 @@
set context {}
ad_return_template
+
+
+
Index: openacs-4/packages/forums/www/message-attachment-chunk.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/Attic/message-attachment-chunk.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/message-attachment-chunk.adp 16 Jul 2002 15:17:28 -0000 1.3
+++ openacs-4/packages/forums/www/message-attachment-chunk.adp 25 Oct 2002 13:00:02 -0000 1.4
@@ -1,6 +1,6 @@
- Attachments:
+ #forums.Attachments#
<%
foreach attachment $attachments {
@@ -10,3 +10,6 @@
+
+
+
Index: openacs-4/packages/forums/www/message-attachment-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/Attic/message-attachment-chunk.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/forums/www/message-attachment-chunk.tcl 10 Sep 2002 22:22:56 -0000 1.4
+++ openacs-4/packages/forums/www/message-attachment-chunk.tcl 25 Oct 2002 13:00:02 -0000 1.5
@@ -7,7 +7,7 @@
}
if {![array exists message]} {
- ad_return_complaint 1 "need to provide a message to display attachments!"
+ ad_return_complaint 1 "[_ forums.lt_need_to_provide_a_mes]"
}
if {![exists_and_not_null bgcolor]} {
@@ -20,3 +20,6 @@
set attachment_graphic [attachments::graphic_url]
ad_return_template
+
+
+
Index: openacs-4/packages/forums/www/message-chunk.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/Attic/message-chunk.adp,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/forums/www/message-chunk.adp 20 Sep 2002 21:31:27 -0000 1.11
+++ openacs-4/packages/forums/www/message-chunk.adp 25 Oct 2002 13:00:02 -0000 1.12
@@ -19,20 +19,20 @@
- [
reply
- |
email
+ [
#forums.reply#
+ |
#forums.email#
]
- [ edit
- | delete
+ [ #forums.edit#
+ | #forums.delete#
- | approve
+ | #forums.approve#
- | reject
+ | #forums.reject#
]
@@ -66,3 +66,6 @@
+
+
+
Index: openacs-4/packages/forums/www/message-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/Attic/message-chunk.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/forums/www/message-chunk.tcl 10 Sep 2002 22:22:56 -0000 1.4
+++ openacs-4/packages/forums/www/message-chunk.tcl 25 Oct 2002 13:00:02 -0000 1.5
@@ -12,7 +12,7 @@
}
if {![array exists message]} {
- ad_return_complaint 1 "Need to provide a message to display."
+ ad_return_complaint 1 "[_ forums.lt_Need_to_provide_a_mes]"
}
if {![exists_and_not_null bgcolor]} {
@@ -23,3 +23,6 @@
if {![exists_and_not_null moderate_p]} { set moderate_p 0 }
if {![exists_and_not_null forum_moderated_p]} {set forum_moderated_p 0}
+
+
+
Index: openacs-4/packages/forums/www/message-email.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-email.adp,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/forums/www/message-email.adp 6 Sep 2002 21:50:39 -0000 1.5
+++ openacs-4/packages/forums/www/message-email.adp 25 Oct 2002 13:00:02 -0000 1.6
@@ -1,11 +1,14 @@
-Email Message: @message.forum_name@ - @message.subject@
+#forums.Email_Message# @message.forum_name@ - @message.subject@
@context@
-Email a copy of the following message:
+#forums.lt_Email_a_copy_of_the_f#
+
+
+
Index: openacs-4/packages/forums/www/message-email.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-email.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/forums/www/message-email.tcl 10 Sep 2002 22:22:56 -0000 1.4
+++ openacs-4/packages/forums/www/message-email.tcl 25 Oct 2002 13:00:02 -0000 1.5
@@ -15,24 +15,24 @@
form create message
element create message message_id \
- -label "Message ID" \
+ -label [_ forums.Message_ID] \
-datatype integer \
-widget hidden
element create message to_email \
- -label Email \
+ -label [_ forums.Email] \
-datatype text \
-widget text \
-html {size 60}
element create message subject \
- -label Subject \
+ -label [_ forums.Subject] \
-datatype text \
-widget text \
-html {size 80}
element create message pre_body \
- -label "Your Note" \
+ -label [_ forums.Your_Note] \
-datatype text \
-widget textarea \
-html {cols 80 rows 10 wrap hard}
@@ -46,7 +46,7 @@
set new_body "$pre_body"
append new_body "\n\n===================================\n\n"
- append new_body "On $message(posting_date), $message(user_name) wrote:\n\n"
+ append new_body "[_ forums.On] $message(posting_date), $message(user_name) [_ forums.wrote]\n\n"
append new_body "$message(content)\n"
# Send the email
@@ -62,14 +62,15 @@
# Get the message information
forum::message::get -message_id $message_id -array message
-element set_properties message subject -value "\[Fwd: $message(subject)\]"
+element set_properties message subject -value "\[[_ forums.Fwd] $message(subject)\]"
element set_properties message message_id -value $message_id
set context [list [list "./forum-view?forum_id=$message(forum_id)" "$message(forum_name)"]]
if {![empty_string_p $message(parent_id)]} {
- lappend context [list "./message-view?message_id=$message(root_message_id)" "Entire Thread"]
+ lappend context [list "./message-view?message_id=$message(root_message_id)" "[_ forums.Entire_Thread]"]
}
lappend context [list "./message-view?message_id=$message(message_id)" "$message(subject)"]
-lappend context {Email to a friend}
+lappend context [_ forums.Email_to_a_friend]
ad_return_template
+
Index: openacs-4/packages/forums/www/message-post-confirm.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-post-confirm.adp,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/forums/www/message-post-confirm.adp 6 Sep 2002 21:50:39 -0000 1.7
+++ openacs-4/packages/forums/www/message-post-confirm.adp 25 Oct 2002 13:00:02 -0000 1.8
@@ -1,8 +1,8 @@
-Confirm Post to Forum: @forum.name@
+#forums.Confirm_Post_to_Forum# @forum.name@
@context@
-Please confirm the following post:
+#forums.lt_Please_confirm_the_fo#
<% set table_border_color [parameter::get -parameter table_border_color] %>
@@ -19,23 +19,26 @@
- Would you like to subscribe to responses?
- No
- Yes
+ #forums.lt_Would_you_like_to_sub#
+ #forums.No#
+ #forums.Yes#
- (Note that you are already subscribed to the forum as a whole. You may get duplicate notifications.)
+ #forums.lt_Note_that_you_are_alr#
- Would you like to attach a file to this message?
- No
- Yes
+ #forums.lt_Would_you_like_to_att#
+ #forums.No#
+ #forums.Yes#
+
+
+
Index: openacs-4/packages/forums/www/message-post.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-post.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/forums/www/message-post.adp 6 Sep 2002 21:50:39 -0000 1.6
+++ openacs-4/packages/forums/www/message-post.adp 25 Oct 2002 13:00:02 -0000 1.7
@@ -1,5 +1,5 @@
-Post to Forum: @forum.name@
+#forums.Post_to_Forum# @forum.name@
@context@
message.subject
@@ -11,3 +11,6 @@
+
+
+
Index: openacs-4/packages/forums/www/message-post.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-post.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/forums/www/message-post.tcl 22 Oct 2002 13:32:37 -0000 1.15
+++ openacs-4/packages/forums/www/message-post.tcl 25 Oct 2002 13:00:02 -0000 1.16
@@ -12,7 +12,7 @@
} -validate {
forum_id_or_parent_id {
if {[empty_string_p $forum_id] && [empty_string_p $parent_id]} {
- ad_complain "You either have to post to a forum or in reply to another message"
+ ad_complain [_ forums.lt_You_either_have_to]
}
}
}
@@ -26,55 +26,54 @@
form create message
element create message message_id \
- -label "Message ID" \
+ -label [_ forums.Message_ID] \
-datatype integer \
-widget hidden
element create message subject \
- -label Subject \
+ -label [_ forums.Subject] \
-datatype text \
-widget text \
-html {size 60} \
- -validate { {expr ![empty_string_p [string trim $value]]} {Please enter a subject} }
+ -validate { {expr ![empty_string_p [string trim $value]]} {[_ forums.lt_Please_enter_a_subjec]} }
# we use ns_queryget to get the value of html_p because it won't be defined
# until the next element -DaveB
element create message content \
- -label Body \
+ -label [_ forums.Body] \
-datatype text \
-widget textarea \
-html {rows 20 cols 60 wrap soft} \
-validate {
- empty {expr ![empty_string_p [string trim $value]]} {Please enter a message}
- html { expr {( [string match [set l_html_p [ns_queryget html_p f]] "t"] && [empty_string_p [set v_message [ad_html_security_check $value]]] ) || [string match $l_html_p "f"] } }
- {}
- }
+ empty {expr ![empty_string_p [string trim $value]]} { [_ forums.lt_Please_enter_a_messag] }
+ html { expr {( [string match [set l_html_p [ns_queryget html_p f]] "t"] && [empty_string_p [set v_message [ad_html_security_check $value]]] ) || [string match $l_html_p "f"] } } {}
+ }
element create message html_p \
- -label Format \
+ -label [_ forums.Format] \
-datatype text \
-widget select \
- -options {{text f} {html t}}
+ -options [list [list [_ forums.text] f] [list [_ forums.html] t]]
element create message parent_id \
- -label "parent ID" \
+ -label [_ forums.parent_ID] \
-datatype integer \
-widget hidden \
-optional
element create message forum_id \
- -label "forum ID" \
+ -label [_ forums.forum_ID] \
-datatype integer \
-widget hidden
element create message confirm_p \
- -label "Confirm?" \
+ -label [_ forums.Confirm] \
-datatype text \
-widget hidden
element create message subscribe_p \
- -label "Subscribe?" \
+ -label [_ forums.Subscribe] \
-datatype text \
-widget hidden \
-optional
@@ -83,7 +82,7 @@
if {$attachments_enabled_p} {
element create message attach_p \
- -label "Attach?" \
+ -label [_ forums.Attach] \
-datatype text \
-widget hidden \
-optional
@@ -121,7 +120,7 @@
}
set context [list [list "./forum-view?forum_id=$forum_id" "$forum(name)"]]
- lappend context {Post a Message}
+ lappend context {[_ forums.Post_a_Message]}
ad_return_template message-post-confirm
return
@@ -159,7 +158,7 @@
form get_values message attach_p
if {$attach_p} {
- set redirect_url [attachments::add_attachment_url -object_id $message_id -return_url $redirect_url -pretty_name "Forum Posting \"$subject\""]
+ set redirect_url [attachments::add_attachment_url -object_id $message_id -return_url $redirect_url -pretty_name "[_ forums.Forum_Posting] \"$subject\""]
}
}
@@ -176,7 +175,7 @@
# get the parent message information
forum::message::get -message_id $parent_id -array parent_message
set forum_id $parent_message(forum_id)
- set subject "Re: $parent_message(subject)"
+ set subject "[_ forums.Re] $parent_message(subject)"
}
@@ -198,9 +197,16 @@
set context [list [list "./forum-view?forum_id=$forum_id" "$forum(name)"]]
if {![empty_string_p $parent_id]} {
lappend context [list "./message-view?message_id=$parent_message(message_id)" "$parent_message(subject)"]
- lappend context {Post a Reply}
+ lappend context [_ forums.Post_a_Reply]
} else {
- lappend context {Post a Message}
+ lappend context [_ forums.Post_a_Message]
}
ad_return_template
+
+
+
+
+
+
+
Index: openacs-4/packages/forums/www/message-view-flat.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/Attic/message-view-flat.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/forums/www/message-view-flat.adp 6 Sep 2002 21:50:39 -0000 1.6
+++ openacs-4/packages/forums/www/message-view-flat.adp 25 Oct 2002 13:00:02 -0000 1.7
@@ -1,5 +1,5 @@
-Forum @forum.name@: @message.subject@
+#forums.Forum# @forum.name@: @message.subject@
@context@
@@ -10,7 +10,7 @@
@notification_chunk@
[
- Post a New Message
+ #forums.Post_a_New_Message#
]
@@ -43,3 +43,6 @@
+
+
+
Index: openacs-4/packages/forums/www/message-view.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-view.adp,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/forums/www/message-view.adp 6 Sep 2002 21:50:39 -0000 1.10
+++ openacs-4/packages/forums/www/message-view.adp 25 Oct 2002 13:00:02 -0000 1.11
@@ -1,5 +1,5 @@
-Forum @forum.name@: @message.subject@
+#forums.Forum# @forum.name@: @message.subject@
@context@
@@ -13,14 +13,14 @@
- [ Post a New Message . ]
+ [ #forums.Post_a_New_Message# . ]
- Search:
+ #forums.Search#
@@ -71,3 +71,6 @@
+
+
+
Index: openacs-4/packages/forums/www/message-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-view.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/forums/www/message-view.tcl 20 Sep 2002 21:31:27 -0000 1.11
+++ openacs-4/packages/forums/www/message-view.tcl 25 Oct 2002 13:00:02 -0000 1.12
@@ -31,12 +31,12 @@
form create search -action search
element create search search_text \
- -label Search \
+ -label [_ forums.Search] \
-datatype text \
-widget text
element create search forum_id \
- -label ForumID \
+ -label [_ forums.ForumID] \
-datatype text \
-widget hidden \
-value $message(forum_id)
@@ -104,14 +104,17 @@
set context [list [list "./forum-view?forum_id=$message(forum_id)" "$message(forum_name)"]]
if {![empty_string_p $message(parent_id)]} {
- lappend context [list "./message-view?message_id=$message(root_message_id)" "Entire Thread"]
- lappend context {One Message}
+ lappend context [list "./message-view?message_id=$message(root_message_id)" "[_ forums.Entire_Thread]"]
+ lappend context {[_ forums.One_Message]}
} else {
- lappend context {One Thread}
+ lappend context {[_ forums.One_Thread]}
}
if {[string equal $forum(presentation_type) flat]} {
ad_return_template "message-view-flat"
} else {
ad_return_template
}
+
+
+
Index: openacs-4/packages/forums/www/search.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/search.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/search.adp 6 Sep 2002 21:50:39 -0000 1.3
+++ openacs-4/packages/forums/www/search.adp 25 Oct 2002 13:00:02 -0000 1.4
@@ -1,5 +1,5 @@
-Search Forums
+#forums.Search_Forums#
@context@
@@ -9,7 +9,7 @@
- Search:
+ #forums.Search#
@@ -21,9 +21,9 @@
- Subject
- Author
- Posting Date
+ #forums.Subject#
+ #forums.Author#
+ #forums.Posting_Date#
@@ -48,11 +48,14 @@
- No Messages
+ #forums.No_Messages#
+
+
+
Index: openacs-4/packages/forums/www/search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/search.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/forums/www/search.tcl 10 Sep 2002 22:22:56 -0000 1.6
+++ openacs-4/packages/forums/www/search.tcl 25 Oct 2002 13:00:02 -0000 1.7
@@ -13,13 +13,13 @@
form create search
element create search search_text \
- -label Search \
+ -label [_ forums.Search] \
-datatype text \
-widget text \
-html {size 60}
element create search forum_id \
- -label ForumID \
+ -label [_ forums.ForumID] \
-datatype text \
-widget hidden \
-value $forum_id \
@@ -43,6 +43,9 @@
set messages:rowcount 0
}
-set context {Search}
+set context {[_ forums.Search]}
ad_return_template
+
+
+
Index: openacs-4/packages/forums/www/user-history.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/user-history.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/forums/www/user-history.adp 6 Sep 2002 21:50:39 -0000 1.6
+++ openacs-4/packages/forums/www/user-history.adp 25 Oct 2002 13:00:02 -0000 1.7
@@ -1,9 +1,9 @@
-Forums: Posting history for @user.full_name@
+#forums.Forums_Posting_hist_lt# @user.full_name@
@context@
- Posting history for
+ #forums.Posting_history_for#
<%
if {![permission::permission_p -object_id [acs_magic_object security_context_root] -privilege admin]} {
@@ -28,9 +28,9 @@
- Forum
- Subject
- Posted
+ #forums.Forum#
+ #forums.Subject#
+ #forums.Posted#
@@ -54,7 +54,7 @@
- No Postings.
+ #forums.No_Postings#
@@ -74,8 +74,8 @@
- Subject
- Posted
+ #forums.Subject#
+ #forums.Posted#
@@ -102,3 +102,6 @@
+
+
+
Index: openacs-4/packages/forums/www/user-history.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/user-history.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/forums/www/user-history.tcl 10 Sep 2002 22:22:56 -0000 1.6
+++ openacs-4/packages/forums/www/user-history.tcl 25 Oct 2002 13:00:02 -0000 1.7
@@ -16,9 +16,9 @@
# choosing the view
set dimensional_list {
{
- view "View:" date {
- {date "by Date" {}}
- {forum "by Forum" {}}
+ view "[_ forums.View]:" date {
+ {date "[_ forums.by_Date]" {}}
+ {forum "[_ forums.by_Forum]" {}}
}
}
}
@@ -36,6 +36,9 @@
set dimensional_chunk [ad_dimensional $dimensional_list]
-set context {{Posting History}}
+set context {[_ forums.Posting_History]}
ad_return_template
+
+
+
Index: openacs-4/packages/forums/www/admin/forum-disable.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/admin/forum-disable.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/forums/www/admin/forum-disable.tcl 10 Sep 2002 22:22:57 -0000 1.4
+++ openacs-4/packages/forums/www/admin/forum-disable.tcl 25 Oct 2002 13:00:03 -0000 1.5
@@ -13,3 +13,6 @@
forum::disable -forum_id $forum_id
ad_returnredirect "./forum-edit?forum_id=$forum_id"
+
+
+
Index: openacs-4/packages/forums/www/admin/forum-edit.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/admin/forum-edit.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/forums/www/admin/forum-edit.adp 6 Sep 2002 21:50:40 -0000 1.6
+++ openacs-4/packages/forums/www/admin/forum-edit.adp 25 Oct 2002 13:00:03 -0000 1.7
@@ -4,11 +4,13 @@
forum.name
-This forum is enabled . You may disable it .
+#forums.This_forum_is# #forums.enabled# . #forums.You_may# #forums.disable_it# .
-This forum is disabled . You may enable it .
+#forums.This_forum_is# #forums.disabled# . #forums.You_may# #forums.enable_it# .
+
+
Index: openacs-4/packages/forums/www/admin/forum-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/admin/forum-edit.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/forums/www/admin/forum-edit.tcl 22 Oct 2002 02:33:31 -0000 1.8
+++ openacs-4/packages/forums/www/admin/forum-edit.tcl 25 Oct 2002 13:00:03 -0000 1.9
@@ -13,23 +13,23 @@
form create forum
element create forum forum_id \
- -label "Forum ID" -datatype integer -widget hidden
+ -label [_ forums.Forum_ID] -datatype integer -widget hidden
element create forum name \
- -label "Name" -datatype text -widget text -html {size 60} -validate { {expr ![empty_string_p [string trim $value]]} {Forum Name can not be blank}
+ -label [_ forums.Name] -datatype text -widget text -html {size 60} -validate { {expr ![empty_string_p [string trim $value]]} {Forum Name can not be blank}
}
element create forum charter \
- -label "Charter" -datatype text -widget textarea -html {cols 60 rows 10 wrap soft} -optional
+ -label [_ forums.Charter] -datatype text -widget textarea -html {cols 60 rows 10 wrap soft} -optional
element create forum presentation_type \
- -label "Presentation" -datatype text -widget select -options {{Flat flat} {Threaded threaded}}
+ -label [_ forums.Presentation] -datatype text -widget select -options {{Flat flat} {Threaded threaded}}
element create forum posting_policy \
- -label "Posting Policy" -datatype text -widget select -options {{open open} {moderated moderated} {closed closed}}
+ -label [_ forums.Posting_Policy] -datatype text -widget select -options {{open open} {moderated moderated} {closed closed}}
element create forum new_threads_p \
- -label "Users Can Create New Threads" -datatype integer -widget radio -options {{yes 1} {no 0}}
+ -label [_ forums.lt_Users_Can_Create_New_] -datatype integer -widget radio -options {{yes 1} {no 0}}
if {[form is_valid forum]} {
template::form get_values forum forum_id name charter presentation_type posting_policy new_threads_p
@@ -57,12 +57,12 @@
# Proper scoping?
if {$package_id != $forum(package_id)} {
- ns_log Error "Forum Administration: Bad Scoping of Forum #$forum_id in Forum Editing"
+ ns_log Error [_ [ad_conn locale] forums.bad_scoping_lt "Forum Administration: Bad Scoping of Forum #%forum_id% in Forum Editing" [list forum_id $forum_id] ]
ad_returnredirect "./"
ad_script_abort
}
-set context [list "Edit forum"]
+set context [list [_ forums.Edit_forum]]
if { [form is_request forum] } {
element set_properties forum forum_id -value $forum_id
@@ -74,3 +74,6 @@
}
ad_return_template
+
+
+
Index: openacs-4/packages/forums/www/admin/forum-enable.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/admin/forum-enable.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/forums/www/admin/forum-enable.tcl 10 Sep 2002 22:22:57 -0000 1.4
+++ openacs-4/packages/forums/www/admin/forum-enable.tcl 25 Oct 2002 13:00:03 -0000 1.5
@@ -13,3 +13,6 @@
forum::enable -forum_id $forum_id
ad_returnredirect "./forum-edit?forum_id=$forum_id"
+
+
+
Index: openacs-4/packages/forums/www/admin/forum-new.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/admin/forum-new.adp,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/forums/www/admin/forum-new.adp 6 Sep 2002 21:50:40 -0000 1.4
+++ openacs-4/packages/forums/www/admin/forum-new.adp 25 Oct 2002 13:00:03 -0000 1.5
@@ -1,6 +1,11 @@
-Create New Forum
+#forums.Create_New_Forum#
@context@
forum.name
+
+
+
+
+
Index: openacs-4/packages/forums/www/admin/forum-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/admin/forum-new.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/forums/www/admin/forum-new.tcl 22 Oct 2002 02:33:31 -0000 1.9
+++ openacs-4/packages/forums/www/admin/forum-new.tcl 25 Oct 2002 13:00:03 -0000 1.10
@@ -15,42 +15,42 @@
form create forum
element create forum forum_id \
- -label "Forum ID" \
+ -label [_ forums.Forum_ID] \
-datatype integer \
-widget hidden
element create forum name \
- -label Name \
+ -label [_ forums.Name] \
-datatype text \
-widget text \
-html {size 60} \
-validate { {expr ![empty_string_p [string trim $value]]} {Forum Name can not be blank}
}
element create forum charter \
- -label Charter \
+ -label [_ forums.Charter] \
-datatype text \
-widget textarea \
-html {cols 60 rows 10 wrap soft} \
-optional
element create forum presentation_type \
- -label Presentation \
+ -label [_ forums.Presentation] \
-datatype text \
-widget select \
-options {{Flat flat} {Threaded threaded}}
element create forum posting_policy \
- -label "Posting Policy" \
+ -label [_ forums.Posting_Policy] \
-datatype text \
-widget select \
- -options {{open open} {moderated moderated} {closed closed}}
+ -options [list [list [_ forums.open] open] [list [_ forums.moderated] moderated] [list [_ forums.closed] closed] ]
element create forum new_threads_p \
- -label "Users Can Create New Threads" \
+ -label [_ forums.lt_Users_Can_Create_New_] \
-datatype integer \
-widget radio \
- -options {{yes 1} {no 0}} \
+ -options [list [list [_ forums.yes] 1] [list [_ forums.no] 0] ] \
-default 1
if {[form is_valid forum]} {
@@ -76,7 +76,7 @@
ad_script_abort
}
-set context [list "Create New Forum"]
+set context [_ forums.Create_New_Forum]
if { [form is_request forum] } {
# Pre-fetch the forum_id
@@ -88,3 +88,5 @@
}
ad_return_template
+
+
Index: openacs-4/packages/forums/www/admin/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/admin/index.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/admin/index.adp 6 Sep 2002 21:50:40 -0000 1.3
+++ openacs-4/packages/forums/www/admin/index.adp 25 Oct 2002 13:00:03 -0000 1.4
@@ -1,21 +1,25 @@
-Forums Administration
+#forums.lt_Forums_Administration#
-Forums
+#forums.Forums#
+
+
+
+
Index: openacs-4/packages/forums/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/admin/index.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/admin/index.tcl 10 Sep 2002 22:22:57 -0000 1.3
+++ openacs-4/packages/forums/www/admin/index.tcl 25 Oct 2002 13:00:03 -0000 1.4
@@ -15,3 +15,6 @@
db_multirow forums select_forums {}
ad_return_template
+
+
+
Index: openacs-4/packages/forums/www/moderate/forum.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/forum.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/moderate/forum.adp 6 Sep 2002 21:50:42 -0000 1.3
+++ openacs-4/packages/forums/www/moderate/forum.adp 25 Oct 2002 13:00:04 -0000 1.4
@@ -1,16 +1,19 @@
-Manage Forum: @forum.name@
-Manage
+#forums.Manage_Forum# @forum.name@
+#forums.Manage#
-Pending Threads
+#forums.Pending_Threads#
+
+
+
Index: openacs-4/packages/forums/www/moderate/forum.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/forum.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/moderate/forum.tcl 10 Sep 2002 22:22:58 -0000 1.3
+++ openacs-4/packages/forums/www/moderate/forum.tcl 25 Oct 2002 13:00:04 -0000 1.4
@@ -20,3 +20,6 @@
db_multirow pending_threads select_pending_threads {}
ad_return_template
+
+
+
Index: openacs-4/packages/forums/www/moderate/message-approve.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/message-approve.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/moderate/message-approve.tcl 10 Sep 2002 22:22:58 -0000 1.3
+++ openacs-4/packages/forums/www/moderate/message-approve.tcl 25 Oct 2002 13:00:04 -0000 1.4
@@ -18,3 +18,6 @@
forum::message::approve -message_id $message_id
ad_returnredirect "$return_url?message_id=$message_id"
+
+
+
Index: openacs-4/packages/forums/www/moderate/message-delete.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/message-delete.adp,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/forums/www/moderate/message-delete.adp 6 Sep 2002 21:50:42 -0000 1.4
+++ openacs-4/packages/forums/www/moderate/message-delete.adp 25 Oct 2002 13:00:04 -0000 1.5
@@ -1,10 +1,10 @@
-Confirm Delete: @message.subject@
-delete
+#forums.Confirm_Delete# @message.subject@
+#forums.delete#
- Are you sure you want to delete this message and all replies to it ?
+ <#Are_you_sure_you_want_to_delete_lt Are you sure you want to delete this message and all replies to it ?#>
+
+
+
Index: openacs-4/packages/forums/www/moderate/message-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/message-delete.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/forums/www/moderate/message-delete.tcl 18 Sep 2002 13:02:00 -0000 1.5
+++ openacs-4/packages/forums/www/moderate/message-delete.tcl 25 Oct 2002 13:00:04 -0000 1.6
@@ -38,3 +38,6 @@
+
+
+
Index: openacs-4/packages/forums/www/moderate/message-edit.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/message-edit.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/moderate/message-edit.adp 6 Sep 2002 21:50:42 -0000 1.3
+++ openacs-4/packages/forums/www/moderate/message-edit.adp 25 Oct 2002 13:00:04 -0000 1.4
@@ -1,5 +1,8 @@
-Edit Message: @message.subject@
-Edit
+#forums.Edit_Message# @message.subject@
+#forums.Edit#
+
+
+
Index: openacs-4/packages/forums/www/moderate/message-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/message-edit.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/moderate/message-edit.tcl 10 Sep 2002 22:22:58 -0000 1.3
+++ openacs-4/packages/forums/www/moderate/message-edit.tcl 25 Oct 2002 13:00:04 -0000 1.4
@@ -14,27 +14,27 @@
form create message
element create message message_id \
- -label "Message ID" \
+ -label [_ forums.Message_ID] \
-datatype integer \
-widget hidden
element create message subject \
- -label Subject \
+ -label [_ forums.Subject] \
-datatype text \
-widget text \
-html {size 60}
element create message content \
- -label Body \
+ -label [_ forums.Body] \
-datatype text \
-widget textarea \
-html {rows 20 cols 60 wrap soft}
element create message html_p \
- -label Format \
+ -label [_ forums.Format]2 \
-datatype text \
-widget select \
- -options {{text f} {html t}}
+ -options [list [list [_ forums.text] f] [list [_ forums.html] t]]
if {[form is_valid message]} {
template::form get_values message message_id subject content html_p
@@ -59,3 +59,7 @@
element set_properties message html_p -value $message(html_p)
ad_return_template
+
+
+
+
Index: openacs-4/packages/forums/www/moderate/message-reject.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/message-reject.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/forums/www/moderate/message-reject.tcl 10 Sep 2002 22:22:58 -0000 1.3
+++ openacs-4/packages/forums/www/moderate/message-reject.tcl 25 Oct 2002 13:00:04 -0000 1.4
@@ -18,3 +18,6 @@
forum::message::reject -message_id $message_id
ad_returnredirect "$return_url?message_id=$message_id"
+
+
+