Index: openacs-4/packages/bug-tracker/catalog/bug-tracker.en_US.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/catalog/bug-tracker.en_US.ISO-8859-1.xml,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/bug-tracker/catalog/bug-tracker.en_US.ISO-8859-1.xml 25 Mar 2004 16:14:19 -0000 1.1
+++ openacs-4/packages/bug-tracker/catalog/bug-tracker.en_US.ISO-8859-1.xml 29 Mar 2004 15:07:33 -0000 1.2
@@ -1,9 +1,255 @@
+ Accepted
+ Open
+ freeze
+ release
+ release date
+ %component_name%
+ User
+ Version
+ resolution code to log title
+ Add category
+ Add new version
+ Admin
+ Administration
+ All
+ all
+ %Components_name%
+ %bugs_name% you're assigned to
+ %bugs_name% you're participating in
+ %bugs_name% in this project
+ Already Released Versions
+ freeze
+ release
+ release date
+ to Version
+ To
+ to version
+ to Version
+ Assign
+ Before you can get started using the bug-tracker, you need to create at least one component.
bug
+ component maintainer
+ project maintainer
+ bug info
+ *Bug
+ Bug Number
+ Bug status: [ %open_filter;noquote% ]
+ Suggestion
+ Bug Type
+ of any Status
bugs
+ By Design
+ resolution code in the case activity log
+ Categories
+ Category
+ Category Type
+ setup
+ Bugs for this Patch
+ Choose setup
+ Close
+ Closed
+ Comment
+ Commented
+ Component
component
+ Component_id %component_id% not found
components
+ Components: %component_filter;noquote%
+ could not be found
+ Create new
+ Create new category type
+ Creation Date
+ (current)
+ | Current: %current_version_name%
+ Current version: %current_version_name%
+ Default
+ Delete
+ Deleted
+ Description
+ format
+ Download patch content
+ Duplicate
+ Edit
+ %component_name%
+ Project
+ Project Maintainer
+ Version
+ Edited
+ Email:
+ Filtered %bug_name% list
+ for version
+ for
+ for Bugs
+ Fix for Version
+ Fixed
+ in version
+ Fixed by <a href=\"patch?patch_number=%patch_number%\">patch \#%patch_number%</a>
+ Fixed in Version
+ in version
+ Found in Version
+ %function% $object_type_name
+ Future Versions
+ from Version
+ hide user agent
+ How to submit a patch
+ In Development
+ Setup
+ Initial project configuration
+ <p>
+ Choose your project's initial configuration.
+</p>
+
+<p>
+ There's nothing that we do here that you can't redo later, if you want to.
+</p>
+ List
+ Default Category Setup
+ Maintainer:
+ Maintainer
+ Manage Categories
+ Manage your notifications
+ to %bugs_name%
+ Patch #%patch_number% \"%patch_summary%\" to a Bug
+ Name in shortcut URL
+ Need_Info
+ New
+ New %Bug_name%
+ Patch
+ No %bugs_name%
+ No categories of this type.
+ No components
+ No Maintainer
+ %next_bug_num% of %all_bugs%
+ No %patches_name%.
+ You don't have permission to '%action.pretty_name%' on bug #%bug_id% (\"%bug.summary%\").
+ Couldn't find user in database
+ None
+ You're not logged in. For more options, <a href="%login_url%">log in now</a>.
+ Not Reproducable
+ tag
Notifications
+ Notifications for
+ No of %pretty_names.bugs%
+ #
+ %Component_name% \"%component_name%\"
+ %Component_name% \"%component_name%\"
+ Open Bugs
+ Open
+ open
+ Opened
+ Page with [ %pagination_filter% ] Show
+ Parameters
+ file
+ \#
+ file (leave blank to keep current file):
+ \#%patch_number%
+ \# %patch_number%: %patch.summary%
+ Denied
+ Permission Denied
+ Permissions
+ Planned Freeze
+ Planned Release
+ Please contact a project administrator to get the components set up.
+ Please visit the <a href="admin/">project administration</a> pages to define software components.
+ Postponed
+ Pref
+ %pretty_plural% per page
+ 1 - High
+ 3 - Low
+ *2 - Normal
+ Priority
+ Priority codes
+ Name
+ Project administration
+ Reassign
+ Refused
+ Release
+ Version
+ Release this version
+ Reopened
+ Request notifications for all activity on this %bug_name%
+ Resolution
+ resolution
+ Resolve
+ Bugs
+ Resolved
+ Resolver
+ Return
+ Search...
+ Select one or more of the following %pretty_names.bugs% for patch "%patch_summary%" (you may select more %pretty_names.bugs% later):
+ set
+ Set to current
+ 1 - Critical
+ 2 - Major
+ 4 - Minor
+ *3 - Normal
+ Severity
+ Severity codes
+ show all
+ show only open
+ user agent
+ <b>Note:</b> Categories are sorted by their
+names. Therefore, it's a good idea to use names of ths form "1 -
+High", "2 - Normal", etc., or "A - Critical",
+"B - Major", etc., thus making the order obvious.
+ State
+ Open
+ Status
+ Stop watching this %bug_name%
+ Submit a new %pretty_names.bug%
+ by
+ Submitter
+ Subscribe
+ to %pretty_name%
+ Summary
+ Support-Center
+ Problem
+ *Question
+ Suggestion
+ Support Type
+ platforms
+ There are no open %pretty_names.bugs% to map the patch to. Try changing the component filter above.
+ this %bug_name%
+ This is a new project.
+ This project is empty.
+ Suggestion
+ *Todo
+ Ticket-Tracker
+ Ticket Type
+ Unassigned
+ Undecided
+ Unknown
+ type
+ bt_conn: unknown flag $flag
+ Unknown variable %var%
+ unmap
+ Unsubscribe
+ from %pretty_name%" "<# Subscribe to %pretty_name%
+ Unsubscribe to notifications for activity on this %bug_name%
+ Upload a patch
+ Use default setup
+ User Agent
+ Version
+ name
+ Name
+ Version_id $version_id not found
+ Versions
+ View the %pretty_names.bugs% for this component
+ Watch this %bug_name%
+ Won't fix
+ Writing a good bug report
+ You can filter by this %component_name% by viisting %filter_url_string%
+ You do not have permission to map this patch to a bug. Only the submitter of the patch and users with write permission on this Bug Tracker project (package instance) may do so.
+ You do not have permission to edit this patch. Only the submitter of the patch and users with write permission on the Bug Tracker project (package instance) may do so.
+ You do not have permission to reopen this refused patch, only users with write permission on the Bug Tracker package instance (project) may do so.
+ You do not have permission to reopen this deleted patch, only users with write permission on the Bug Tracker package instance (project) and the submitter of the patch may do so.
+ do not have permission to cancel this patch - only the submitter of the patch may do so. If you are an administrator you can however refuse the patch.
+ You don't have permission to edit this patch.
+ You do not have permission to unmap a bug from this patch. Only the submitter of the patch and users with write permission on the Bug Tracker package instance (project) may do so.
+ Your Preferences
+ Your version
+ Your version:
Index: openacs-4/packages/bug-tracker/lib/nav-bar.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/lib/nav-bar.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/bug-tracker/lib/nav-bar.tcl 25 Mar 2004 16:12:24 -0000 1.11
+++ openacs-4/packages/bug-tracker/lib/nav-bar.tcl 29 Mar 2004 15:07:33 -0000 1.12
@@ -56,7 +56,7 @@
multirow append links "[bug_tracker::conn Bugs]" [export_vars -base "${url_prefix}." { { f_fix_for_version {[bug_tracker::conn current_version_id]} } }]
if { $create_p } {
- multirow append links "New [bug_tracker::conn Bug]" "${url_prefix}bug-add"
+ multirow append links "[_ bug-tracker.New] [bug_tracker::conn Bug]" "${url_prefix}bug-add"
}
if { [ad_conn untrusted_user_id] != 0 } {
@@ -69,21 +69,21 @@
}
if { $patches_p } {
- multirow append links "Patches" [export_vars -no_empty -base "[ad_conn package_url]patch-list" { { status open } { apply_to_version {[bug_tracker::conn current_version_id]} } }]
+ multirow append links "[bug_tracker::conn Patches]" [export_vars -no_empty -base "[ad_conn package_url]patch-list" { { status open } { apply_to_version {[bug_tracker::conn current_version_id]} } }]
if { $create_p } {
- multirow append links "New Patch" "[ad_conn package_url]patch-add"
+ multirow append links "[_ bug-tracker.New] [bug_tracker::conn Patches]" "[ad_conn package_url]patch-add"
}
}
multirow append links [_ bug-tracker.Notifications] "[ad_conn package_url]notifications"
if { $versions_p } {
- multirow append links "Prefs" "[ad_conn package_url]prefs"
+ multirow append links "[_ bug-tracker.Prefs]" "[ad_conn package_url]prefs"
}
if { $admin_p } {
- multirow append links "Admin" "[ad_conn package_url]admin/"
+ multirow append links "[_ bug-tracker.Admin]" "[ad_conn package_url]admin/"
}
set form_action_url "[ad_conn package_url]bug"
Index: openacs-4/packages/bug-tracker/lib/pagination.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/lib/pagination.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/bug-tracker/lib/pagination.adp 22 Sep 2003 15:45:10 -0000 1.3
+++ openacs-4/packages/bug-tracker/lib/pagination.adp 29 Mar 2004 15:07:33 -0000 1.4
@@ -3,8 +3,9 @@
+
Index: openacs-4/packages/bug-tracker/lib/prev-next-links.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/lib/prev-next-links.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/bug-tracker/lib/prev-next-links.tcl 3 May 2002 16:29:59 -0000 1.1
+++ openacs-4/packages/bug-tracker/lib/prev-next-links.tcl 29 Mar 2004 15:07:33 -0000 1.2
@@ -8,7 +8,7 @@
set rownum 0
-foreach var { prev_url next_url } pretty { "Prev" "Next" } {
+foreach var { prev_url next_url } pretty { "[_ acs-kernel.common_Prev]" "[_ acs-kernel.common_Next]" } {
if { [info exists $var] } {
multirow append links [set $var] $pretty [incr rownum]
}
Index: openacs-4/packages/bug-tracker/lib/version-bar.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/lib/version-bar.adp,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/bug-tracker/lib/version-bar.adp 28 Aug 2003 09:45:29 -0000 1.3
+++ openacs-4/packages/bug-tracker/lib/version-bar.adp 29 Mar 2004 15:07:33 -0000 1.4
@@ -2,19 +2,20 @@
- Your version: @user_version_name@
+ #bug-tracker.Your_version# @user_version_name@
- | Current: @current_version_name@
+ #bug-tracker.Current_version_1#
- (current)
+ #bug-tracker.current#
- Current version: @current_version_name@
+ #bug-tracker.Current_version_2#
+
Index: openacs-4/packages/bug-tracker/tcl/bug-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-procs.tcl,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/bug-tracker/tcl/bug-procs.tcl 8 Mar 2004 14:01:19 -0000 1.14
+++ openacs-4/packages/bug-tracker/tcl/bug-procs.tcl 29 Mar 2004 15:07:33 -0000 1.15
@@ -1,4 +1,3 @@
-
ad_library {
Bug Tracker Bug Library
@@ -49,13 +48,12 @@
-workflow_short_name [bug_tracker::bug::workflow_short_name]]
# Derived fields
- set row(bug_number_display) "#$row(bug_number)"
+ set row(bug_number_display) "$row(bug_number)"
set row(component_name) [bug_tracker::component_get_name -component_id $row(component_id)]
set row(found_in_version_name) [bug_tracker::version_get_name -version_id $row(found_in_version)]
set row(fix_for_version_name) [bug_tracker::version_get_name -version_id $row(fix_for_version)]
set row(fixed_in_version_name) [bug_tracker::version_get_name -version_id $row(fixed_in_version)]
-
# Get state information
workflow::case::fsm::get -case_id $case_id -array case -enabled_action_id $enabled_action_id
set row(pretty_state) $case(pretty_state)
@@ -303,6 +301,8 @@
# Get the type id
set type "workflow_case"
set type_id [notification::type::get_type_id -short_name $type]
+ # get some i18n text
+ set bug_name "[bug_tracker::conn bug]"
# Check if subscribed
set request_id [notification::request::get_request_id \
@@ -318,13 +318,13 @@
-object_id $bug_id \
-url $return_url \
-user_id $user_id \
- -pretty_name "this bug"]
- set label "Watch this [bug_tracker::conn bug]"
- set title "Request notifications for all activity on this [bug_tracker::conn bug]"
+ -pretty_name "[_ bug-tracker.this_bug]"]
+ set label "[_ bug-tracker.watch_this_bug]"
+ set title "[_ bug-tracker.request_notification_for_bug]"
} else {
set url [notification::display::unsubscribe_url -request_id $request_id -url $return_url]
- set label "Stop watching this [bug_tracker::conn bug]"
- set title "Unsubscribe to notifications for activity on this [bug_tracker::conn bug]"
+ set label "[_ bug-tracker.stop_watching_bug]"
+ set title "[_ bug-tracker.unsubscribe_to_bug]"
}
return [list $url $label $title]
}
@@ -334,7 +334,7 @@
} {
set spec {
bug {
- pretty_name "Bug"
+ pretty_name "#bug-tracker.Bug#"
package_key "bug-tracker"
object_type "bt_bug"
callbacks {
@@ -343,13 +343,13 @@
}
roles {
submitter {
- pretty_name "Submitter"
- callbacks {
+ pretty_name "#bug-tracker.Submitter#"
+ callbacks {
workflow.Role_DefaultAssignees_CreationUser
}
}
resolver {
- pretty_name "Resolver"
+ pretty_name "#bug-tracker.Resolver#"
callbacks {
bug-tracker.ComponentMaintainer
bug-tracker.ProjectMaintainer
@@ -360,33 +360,33 @@
}
states {
open {
- pretty_name "Open"
+ pretty_name "#bug-tracker.state_open#"
hide_fields { resolution fixed_in_version }
}
resolved {
- pretty_name "Resolved"
+ pretty_name "#bug-tracker.Resolved#"
}
closed {
- pretty_name "Closed"
+ pretty_name "#bug-tracker.Closed#"
}
}
actions {
open {
- pretty_name "Open"
- pretty_past_tense "Opened"
+ pretty_name "#bug-tracker.action_open#"
+ pretty_past_tense "#bug-tracker.Opened#"
new_state "open"
initial_action_p t
}
comment {
- pretty_name "Comment"
- pretty_past_tense "Commented"
+ pretty_name "#bug-tracker.Comment#"
+ pretty_past_tense "#bug-tracker.Commented#"
allowed_roles { submitter resolver }
privileges { read write }
always_enabled_p t
}
edit {
- pretty_name "Edit"
- pretty_past_tense "Edited"
+ pretty_name "#acs-kernel.common_Edit#"
+ pretty_past_tense "#bug-tracker.Edited#"
allowed_roles { submitter resolver }
privileges { write }
always_enabled_p t
@@ -401,39 +401,39 @@
}
}
reassign {
- pretty_name "Reassign"
- pretty_past_tense "Reassigned"
+ pretty_name "#bug-tracker.Reassign#"
+ pretty_past_tense "#bug-tracker._Reassigned#"
allowed_roles { submitter resolver }
privileges { write }
enabled_states { resolved }
assigned_states { open }
edit_fields { role_resolver }
}
resolve {
- pretty_name "Resolve"
- pretty_past_tense "Resolved"
- assigned_role "resolver"
+ pretty_name "#bug-tracker.Resolve#"
+ pretty_past_tense "#bug-tracker.Resolved#"
+ assigned_role "#bug-tracker.resolver#"
enabled_states { resolved }
assigned_states { open }
- new_state "resolved"
+ new_state "#bug-tracker.resolved#"
privileges { write }
edit_fields { resolution fixed_in_version }
callbacks { bug-tracker.CaptureResolutionCode }
}
close {
- pretty_name "Close"
- pretty_past_tense "Closed"
- assigned_role "submitter"
+ pretty_name "#bug-tracker.Close#"
+ pretty_past_tense "#bug-tracker.Closed#"
+ assigned_role "#bug-tracker.submitter#"
assigned_states { resolved }
- new_state "closed"
+ new_state "#bug-tracker.closed#"
privileges { write }
}
reopen {
- pretty_name "Reopen"
- pretty_past_tense "Reopened"
+ pretty_name "#bug-tracker.Reopen#"
+ pretty_past_tense "#bug-tracker.Reopened#"
allowed_roles { submitter }
enabled_states { resolved closed }
- new_state "open"
+ new_state "#bug-tracker.open#"
privileges { write }
}
}
@@ -509,7 +509,7 @@
#####
ad_proc -private bug_tracker::bug::capture_resolution_code::pretty_name {} {
- return "Capture resolution code in the case activity log"
+ return "[_ bug-tracker.Capture]"
}
ad_proc -private bug_tracker::bug::capture_resolution_code::do_side_effect {
@@ -520,7 +520,7 @@
} {
workflow::case::add_log_data \
-entry_id $entry_id \
- -key "resolution" \
+ -key "[_ bug-tracker.resolution]" \
-value [db_string select_resolution_code {}]
}
@@ -531,7 +531,7 @@
#####
ad_proc -private bug_tracker::bug::format_log_title::pretty_name {} {
- return "Add resolution code to log title"
+ return "[_ bug-tracker.Add_3]"
}
ad_proc -private bug_tracker::bug::format_log_title::format_log_title {
@@ -557,7 +557,7 @@
#####
ad_proc -private bug_tracker::bug::get_component_maintainer::pretty_name {} {
- return "Bug-tracker component maintainer"
+ return "[_ bug-tracker.Bug-tracker]"
}
ad_proc -private bug_tracker::bug::get_component_maintainer::get_assignees {
@@ -575,7 +575,7 @@
#####
ad_proc -private bug_tracker::bug::get_project_maintainer::pretty_name {} {
- return "Bug-tracker project maintainer"
+ return "[_ bug-tracker.Bug-tracker_1]"
}
ad_proc -private bug_tracker::bug::get_project_maintainer::get_assignees {
@@ -593,7 +593,7 @@
#####
ad_proc -private bug_tracker::bug::notification_info::pretty_name {} {
- return "Bug-tracker bug info"
+ return "[_ bug-tracker.Bug-tracker_2]"
}
ad_proc -private bug_tracker::bug::notification_info::get_notification_info {
@@ -608,20 +608,20 @@
set notification_subject_tag [db_string select_notification_tag {} -default {}]
- set one_line "$pretty_names(Bug) #$bug(bug_number): $bug(summary)"
+ set one_line "$pretty_names(Bug) $bug(summary)"
# Build up data structures with the form labels and values
# (Note, this is something that the metadata system should be able to do for us)
array set label {
- summary "Summary"
- status "Status"
- found_in_version "Found in version"
- fix_for_version "Fix for version"
- fixed_in_version "Fixed in version"
+ summary "[_ bug-tracker.Summary]"
+ status "[_ bug-tracker.Status]"
+ found_in_version "[_ bug-tracker.Found]"
+ fix_for_version "[_ bug-tracker.Fix]"
+ fixed_in_version "[_ bug-tracker.Fixed_1]"
}
- set label(bug_number) "$pretty_names(Bug) #"
+ set label(bug_number) "$pretty_names(Bug) "
set label(component) "$pretty_names(Component)"
set fields {
@@ -648,9 +648,9 @@
set value(component) $bug(component_name)
set value(summary) $bug(summary)
set value(status) $bug(pretty_state)
- set value(found_in_version) [ad_decode $bug(found_in_version_name) "" "Unknown" $bug(found_in_version_name)]
- set value(fix_for_version) [ad_decode $bug(fix_for_version_name) "" "Undecided" $bug(fix_for_version_name)]
- set value(fixed_in_version) [ad_decode $bug(fixed_in_version_name) "" "Unknown" $bug(fixed_in_version_name)]
+ set value(found_in_version) [ad_decode $bug(found_in_version_name) "" "[_ bug-tracker.Unknown]" $bug(found_in_version_name)]
+ set value(fix_for_version) [ad_decode $bug(fix_for_version_name) "" "[_ bug-tracker.Undecided]" $bug(fix_for_version_name)]
+ set value(fixed_in_version) [ad_decode $bug(fixed_in_version_name) "" "[_ bug-tracker.Unknown]" $bug(fixed_in_version_name)]
# Remove fields that should be hidden in this state
foreach field $bug(hide_fields) {
@@ -685,44 +685,44 @@
set elements {
bug_number {
- label "[bug_tracker::conn Bug] \#"
- display_template {\#@bugs.bug_number@}
+ label "[bug_tracker::conn Bug] [_ bug-tracker.number_symbol] "
+ display_template {[_ bug-tracker.number_symbol]@bugs.bug_number@}
html { align right }
}
summary {
- label "Summary"
+ label "[_ bug-tracker.Summary]"
link_url_eval {[export_vars -base bug -entire_form -override { bug_number }]}
- aggregate_label "Number of $pretty_names(bugs)"
- }
- comment {
- label "Details"
+ aggregate_label "[_ bug-tracker.Number]"
+ }
+ comment {
+ label "[_ bug-tracker.Details]"
display_col comment_short
hide_p 1
}
state {
- label "State"
+ label "[_ bug-tracker.State]"
display_template {@bugs.pretty_state@ (@bugs.resolution_pretty@)}
aggregate count
}
creation_date_pretty {
- label "Submitted"
+ label "[_ bug-tracker.Submitted]"
}
submitter {
- label "Submitter"
+ label "[_ bug-tracker.Submitter]"
display_template {@bugs.submitter_first_names@ @bugs.submitter_last_name@}
hide_p 1
}
}
if { [bug_tracker::versions_p] } {
lappend elements fix_for_version {
- label "Fix for"
+ label "[_ bug-tracker.Fix_1]"
display_col fix_for_version_name
}
}
lappend elements component {
- label "Component"
+ label "[_ bug-tracker.Component]"
display_col component_name
}
@@ -731,7 +731,7 @@
set filters {
f_state {
- label "State"
+ label "[_ bug-tracker.State]"
values $state_values
where_clause {cfsm.current_state = :f_state}
default_value $state_default_value
@@ -746,12 +746,12 @@
default_direction desc
}
summary {
- label "Summary"
+ label "[_ bug-tracker.Summary]"
orderby_asc {upper(b.summary) asc, b.summary asc, b.bug_number asc}
orderby_desc {upper(b.summary) desc, b.summary desc, b.bug_number desc}
}
submitter {
- label "Submitter"
+ label "[_ bug-tracker.Submitter]"
orderby_asc {upper(submitter.first_names) asc, upper(submitter.last_name) asc, b.bug_number asc}
orderby_asc {upper(submitter.first_names) desc, upper(submitter.last_name) desc, b.bug_number desc}
}
@@ -784,11 +784,11 @@
if { [bug_tracker::versions_p] } {
lappend filters f_fix_for_version {
- label "Fix for version"
+ label "[_ bug-tracker.Fix]"
values {[db_list_of_lists select_fix_for_versions {}]}
where_clause { b.fix_for_version = :f_fix_for_version }
null_where_clause { b.fix_for_version is null }
- null_label "Undecided"
+ null_label "[_ bug-tracker.Undecided]"
}
}
@@ -802,15 +802,15 @@
[list \
label $action(pretty_name) \
values $values \
- null_label "Unassigned" \
+ null_label "[_ bug-tracker.Unassigned]" \
where_clause [db_map filter_assignee_where_clause] \
null_where_clause [db_map filter_assignee_null_where_clause]]
}
# Stat: By Component
lappend filters f_component {
- label "Component"
+ label "[_ bug-tracker.Component]"
values {[db_list_of_lists select_components {}]}
where_clause {b.component_id = :f_component}
}
@@ -829,11 +829,11 @@
-orderby $orderbys \
-formats {
table {
- label "Table"
+ label "[_ bug-tracker.Table]"
layout table
}
list {
- label "List"
+ label "[_ bug-tracker.List]"
layout list
template {
@@ -878,7 +878,8 @@
ad_proc bug_tracker::bug::get_multirow {} {
foreach var [bug_tracker::get_export_variables] {
- upvar \#[template::adp_level] $var $var
+#JOEL put this back later
+ upvar #[template::adp_level] $var $var
}
set workflow_id [bug_tracker::bug::get_instance_workflow_id]
Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl,v
diff -u -r1.26 -r1.27
--- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl 25 Mar 2004 16:11:08 -0000 1.26
+++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl 29 Mar 2004 15:07:33 -0000 1.27
@@ -71,14 +71,14 @@
return {}
}
default {
- error "Unknown variable $var"
+ error "[_ bug-tracker.Unknown_variable]"
}
}
}
}
default {
- error "bt_conn: unknown flag $flag"
+ error "[_ bug-tracker.Unknown_flag]"
}
}
}
@@ -268,7 +268,7 @@
# we call ourselves again, so we'll get the info this time
return [get_user_prefs_internal $package_id $user_id]
} else {
- error "Couldn't find user in database"
+ error "[_ bug-tracker.No_user_in_database]"
}
} else {
return [array get result]
@@ -345,17 +345,17 @@
}
ad_proc bug_tracker::patch_status_get_options {} {
- return { { "Open" open } { "Accepted" accepted } { "Refused" refused } { "Deleted" deleted }}
+ return { { "[_ bug-tracker.Open]" open } { "[_ bug-tracker.Accepted]" accepted } { "[_ bug-tracker.Refused]" refused } { "[_ bug-tracker.Deleted]" deleted }}
}
ad_proc bug_tracker::patch_status_pretty {
status
} {
array set status_codes {
- open "Open"
- accepted "Accepted"
- refused "Refused"
- deleted "Deleted"
+ open "[_ bug-tracker.Open]"
+ accepted "[_ bug-tracker.Accepted]"
+ refused "[_ bug-tracker.Refused]"
+ deleted "[_ bug-tracker.Deleted]"
}
if { [info exists status_codes($status)] } {
return $status_codes($status)
@@ -372,22 +372,22 @@
ad_proc bug_tracker::resolution_get_options {} {
return {
- { "Fixed" fixed } { "By Design" bydesign } { "Won't Fix" wontfix } { "Postponed" postponed }
- { "Duplicate" duplicate } { "Not Reproducable" norepro } { "Need Info" needinfo }
+ { "[_ bug-tracker.Fixed]" fixed } { "[_ bug-tracker.By_Design]" bydesign } { "[_ bug-tracker.Wont_Fix]" wontfix } { "[_ bug-tracker.Postponed]" postponed }
+ { "[_ bug-tracker.Duplicate]" duplicate } { "[_ bug-tracker.Not_Reproducable]" norepro } { "[_ bug-tracker.Need_Info]" needinfo }
}
}
ad_proc bug_tracker::resolution_pretty {
resolution
} {
array set resolution_codes {
- fixed "Fixed"
- bydesign "By Design"
- wontfix "Won't Fix"
- postponed "Postponed"
- duplicate "Duplicate"
- norepro "Not Reproducable"
- needinfo "Need Info"
+ fixed "[_ bug-tracker.Fixed]"
+ bydesign "[_ bug-tracker.By_Design]"
+ wontfix "[_ bug-tracker.Wont_Fix]"
+ postponed "[_ bug-tracker.Postponed]"
+ duplicate "[_ bug-tracker.Duplicate]"
+ norepro "[_ bug-tracker.Not_Reproducable]"
+ needinfo "[_ bug-tracker.Need_Info]"
}
if { [info exists resolution_codes($resolution)] } {
return $resolution_codes($resolution)
@@ -396,10 +396,6 @@
}
}
-
-
-
-
#####
#
# Categories/Keywords
@@ -604,25 +600,22 @@
Get the package's default configurations for categories and parameters.
} {
return {
- "Bug-Tracker" {
+ "[_ bug-tracker.Bug_Tracker]" {
categories {
- "Bug Type" {
- "*Bug"
- "Suggestion"
- "Todo"
+ "[_ bug-tracker.Bug_Type]" {
+ "[_ bug-tracker.Bug_Bug_cat]"
+ "[_ bug-tracker.Bug_Sug_Cat]"
}
- "Priority" {
- "1 - High"
- "*2 - Normal"
- "3 - Low"
+ "[_ bug-tracker.Priority]" {
+ "[_ bug-tracker.Prio_High_Cat]"
+ "[_ bug-tracker.Prio_Norm_Cat]"
+ "[_ bug-tracker.Prio_Low_Cat]"
}
- "Severity" {
- "1 - Critical"
- "2 - Major"
- "*3 - Normal"
- "4 - Minor"
- "5 - Trivial"
- "6 - Enhancement"
+ "[_ bug-tracker.Severity]" {
+ "[_ bug-tracker.Sev_Critical_Cat]"
+ "[_ bug-tracker.Sev_Major_Cat]"
+ "[_ bug-tracker.Sev_Normal_Cat]"
+ "[_ bug-tracker.Sev_Minor_Cat]"
}
}
parameters {
@@ -634,16 +627,16 @@
VersionsP "1"
}
}
- "Ticket-Tracker" {
+ "[_ bug-tracker.Ticket_Tracker]" {
categories {
- "Ticket Type" {
- "*Todo"
- "Suggestion"
+ "[_ bug-tracker.Ticket_Type]" {
+ "[_ bug-tracker.Ticket_Todo_Cat]"
+ "[_ bug-tracker.Ticket_Sugg_Cat]"
}
- "Priority" {
- "1 - High"
- "*2 - Normal"
- "3 - Low"
+ "[_ bug-tracker.Priority]" {
+ "[_ bug-tracker.Prio_High_Cat]"
+ "[_ bug-tracker.Prio_Norm_Cat]"
+ "[_ bug-tracker.Prio_Low_Cat]"
}
}
parameters {
@@ -655,6 +648,16 @@
VersionsP "0"
}
}
+ "[_ bug-tracker.Support_Center]" {
+ categories {
+ "[_ bug-tracker.Support_Type]" {
+ "[_ bug-tracker.Support_Question]"
+ "[_ bug-tracker.Support_Suggestion]"
+ "[_ bug-tracker.Support_Problem]"
+
+ }
+ }
+ }
}
}
@@ -750,11 +753,11 @@
set versions_list [util_memoize [list bug_tracker::version_get_options_not_cached $package_id]]
if { $include_unknown_p } {
- set versions_list [concat { { "Unknown" "" } } $versions_list]
+ set versions_list [concat { { "[_ bug-tracker.Unknown]" "" } } $versions_list]
}
if { $include_undecided_p } {
- set versions_list [concat { { "Undecided" "" } } $versions_list]
+ set versions_list [concat { { "[_ bug-tracker.Undecided]" "" } } $versions_list]
}
return $versions_list
@@ -801,7 +804,7 @@
return $name
}
}
- error "Version_id $version_id not found"
+ error "[_ bug-tracker.Version_id]"
}
@@ -822,7 +825,7 @@
set components_list [util_memoize [list bug_tracker::components_get_options_not_cached $package_id]]
if { $include_unknown_p } {
- set components_list [concat { { "Unknown" "" } } $components_list]
+ set components_list [concat { { "[_ bug-tracker.Unknown]" "" } } $components_list]
}
return $components_list
@@ -855,7 +858,7 @@
return [lindex $elm 0]
}
}
- error "Component_id $component_id not found"
+ error "[_ bug-tracker.Component_id_not_found]"
}
ad_proc bug_tracker::component_get_url_name {
@@ -923,13 +926,13 @@
} {
array set action_codes {
- open "Opened"
- edit "Edited"
- comment "Comment"
- accept "Accepted"
- reopen "Reopened"
- refuse "Refused"
- delete "Deleted"
+ open "[_ bug-tracker.Opened]"
+ edit "[_ bug-tracker.Edited]"
+ comment "[_ bug-tracker.Comment]"
+ accept "[_ bug-tracker.Accepted]"
+ reopen "[_ bug-tracker.Reopened]"
+ refuse "[_ bug-tracker.Refused]"
+ delete "[_ bug-tracker.Deleted]"
}
if { [info exists action_codes($action)] } {
@@ -982,8 +985,8 @@
set users_list [db_list_of_lists users $sql]
- set users_list [concat { { "Unassigned" "" } } $users_list]
- lappend users_list { "Search..." ":search:"}
+ set users_list [concat { { "[_ bug-tracker.Unassigned]" "" } } $users_list]
+ lappend users_list { "[_ bug-tracker.Search]" ":search:"}
return $users_list
}
@@ -1067,7 +1070,7 @@
set unmap_url "unmap-patch-from-bug?[export_vars -url { patch_number bug_number } ]"
if { $write_or_submitter_p } {
- set unmap_link "(unmap)"
+ set unmap_link "([_ bug-tracker.unmap])"
} else {
set unmap_link ""
}
@@ -1077,7 +1080,8 @@
if { [llength $bug_link_list] != 0 } {
set bugs_string [join $bug_link_list "
"]
} else {
- set bugs_string "No bugs."
+ set bugs_name [bug_tracker::conn bugs]
+ set bugs_string "[_ bug-tracker.No_Bugs]"
}
return $bugs_string
@@ -1086,7 +1090,7 @@
ad_proc bug_tracker::get_patch_links {
{-bug_id:required}
- {-show_patch_status "open"}
+ {-show_patch_status "[_ bug-tracker.open]"}
} {
set patch_list [list]
@@ -1101,10 +1105,11 @@
db_foreach get_patches_for_bug "" {
- set status_indicator [ad_decode $show_patch_status "all" "($status)" ""]
+ set status_indicator [ad_decode $show_patch_status "[_ bug-tracker.all]" "($status)" ""]
lappend patch_list "[ad_quotehtml $summary] $status_indicator"
} if_no_rows {
- set patches_string "No patches."
+ set patches_name [bug_tracker::conn patches]
+ set patches_string "[_ bug-tracker.No_patches]"
}
if { [llength $patch_list] != 0 } {
@@ -1156,9 +1161,9 @@
ns_log notice "bug_tracker::security_violation: $user_id doesn't have permission to '$action(pretty_name)' on bug $bug(summary)"
ad_return_forbidden \
- "Permission Denied" \
+ "[_ bug-tracker.Permission_Denied]" \
"
- You don't have permission to '$action(pretty_name)' on bug #$bug_id (\"$bug(summary)\").
+ [_ bug-tracker.No_Permission_to_do_action]
"
ad_script_abort
}
Index: openacs-4/packages/bug-tracker/www/bug-add.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/bug-add.adp,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/bug-tracker/www/bug-add.adp 28 Sep 2003 01:28:18 -0000 1.8
+++ openacs-4/packages/bug-tracker/www/bug-add.adp 29 Mar 2004 15:07:34 -0000 1.9
@@ -6,11 +6,12 @@
+
Index: openacs-4/packages/bug-tracker/www/bug-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/bug-add.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/bug-tracker/www/bug-add.tcl 28 Sep 2003 01:28:18 -0000 1.11
+++ openacs-4/packages/bug-tracker/www/bug-add.tcl 29 Mar 2004 15:07:34 -0000 1.12
@@ -21,9 +21,9 @@
set project_name [bug_tracker::conn project_name]
set package_id [ad_conn package_id]
set package_key [ad_conn package_key]
+set Bug_name [bug_tracker::conn Bug]
+set page_title [_ bug-tracker.New_1]
-set page_title "New [bug_tracker::conn Bug]"
-
set context [list $page_title]
set user_id [ad_conn user_id]
@@ -41,11 +41,11 @@
{value {[bug_tracker::conn component_id]}}
}
{summary:text
- {label "Summary"}
+ {label "[_ bug-tracker.Summary]"}
{html {size 50}}
}
{found_in_version:text(select),optional
- {label "Version"}
+ {label "[_ bug-tracker.Version]"}
{options {[bug_tracker::version_get_options -include_unknown]}}
{value {[bug_tracker::conn user_version_id]}}
}
@@ -64,7 +64,7 @@
ad_form -extend -name bug -form {
{description:richtext(richtext),optional
- {label "Description"}
+ {label "[_ bug-tracker.Description]"}
{html {cols 60 rows 13}}
}
Index: openacs-4/packages/bug-tracker/www/bug.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/bug.adp,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/bug-tracker/www/bug.adp 25 Mar 2004 22:06:25 -0000 1.14
+++ openacs-4/packages/bug-tracker/www/bug.adp 29 Mar 2004 15:07:34 -0000 1.15
@@ -20,17 +20,17 @@
- You're not logged in. For more options, log in now.
+ #bug-tracker.Not_logged_in#
Index: openacs-4/packages/bug-tracker/www/bug.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/bug.tcl,v
diff -u -r1.27 -r1.28
--- openacs-4/packages/bug-tracker/www/bug.tcl 28 Jan 2004 11:11:59 -0000 1.27
+++ openacs-4/packages/bug-tracker/www/bug.tcl 29 Mar 2004 15:07:34 -0000 1.28
@@ -7,8 +7,8 @@
} [bug_tracker::get_page_variables {
bug_number:integer,notnull
{user_agent_p:boolean 0}
- {show_patch_status "open"}
-}]
+ {show_patch_status "[_ bug-tracker.open]"}
+%}]
#####
#
@@ -25,9 +25,9 @@
set user_id [ad_conn user_id]
permission::require_permission -object_id $package_id -privilege read
+set Bug_name [bug_tracker::conn Bug]
+set page_title "[_ bug-tracker.%Bug_name% %bug_number%]"
-set page_title "[bug_tracker::conn Bug] #$bug_number"
-
set context [list [ad_quotehtml $page_title]]
# Is this project using multiple versions?
@@ -45,7 +45,9 @@
# Get the bug_id
if { ![db_0or1row permission_info {} -column_array bug] } {
- ad_return_complaint 1 "Could not find bug \#$bug_number"
+ set Bug_name [bug_tracker::conn Bug]
+ set could_not_be_found [_ bug-tracker.Could_not_find]
+ ad_return_complaint 1 "[_ bug-tracker.%Bug_name% %bug_number% %could_not_be_found%]"
return
}
@@ -105,14 +107,14 @@
if { [empty_string_p $enabled_action_id] } {
set patch_label [ad_decode $show_patch_status \
- "open" "Open Patches (show all)" \
- "all" "All Patches (show only open)" \
- "Patches"]
+ "open" "[_ bug-tracker.Open] [bug_tracker::conn Patches] ([_ bug-tracker.show_all])" \
+ "all" "[_ bug-tracker.All] [bug_tracker::conn Patches] ([_ bug-tracker.show_only_open])" \
+ "[bug_tracker::conn Patches]"]
} else {
set patch_label [ad_decode $show_patch_status \
- "open" "Open Patches" \
- "all" "All Patches" \
- "Patches"]
+ "open" "[_ bug-tracker.Open] [bug_tracker::conn Patches]" \
+ "all" "[_ bug-tracker.All] [bug_tracker::conn Patches]" \
+ "[bug_tracker::conn Patches]"]
}
ad_form -name bug -cancel_url $return_url -mode display -has_edit 1 -actions $actions -form {
@@ -126,7 +128,7 @@
{mode display}
}
{summary:text(text)
- {label "Summary"}
+ {label "[_ bug-tracker.Summary]"}
{before_html ""}
{after_html ""}
{mode display}
@@ -137,13 +139,13 @@
ad_form -extend -name bug -form {
{pretty_state:text(inform)
- {label "Status"}
+ {label "[_ bug-tracker.Status]"}
{before_html ""}
{after_html ""}
{mode display}
}
{resolution:text(select),optional
- {label "Resolution"}
+ {label "[_ bug-tracker.Resolution]"}
{options {[bug_tracker::resolution_get_options]}}
{mode display}
}
@@ -162,7 +164,7 @@
ad_form -extend -name bug -form {
{found_in_version:text(select),optional
- {label "Found in Version"}
+ {label "[_ bug-tracker.Found_in_Version]"}
{options {[bug_tracker::version_get_options -include_unknown]}}
{mode display}
}
@@ -178,21 +180,21 @@
{mode display}
}
{user_agent:text(inform)
- {label "User Agent"}
+ {label "[_ bug-tracker.User_Agent]"}
{mode display}
}
{fix_for_version:text(select),optional
- {label "Fix for Version"}
+ {label "[_ bug-tracker.Fix_for_Version]"}
{options {[bug_tracker::version_get_options -include_undecided]}}
{mode display}
}
{fixed_in_version:text(select),optional
- {label "Fixed in Version"}
+ {label "[_ bug-tracker.Fixed_in_Version]"}
{options {[bug_tracker::version_get_options -include_undecided]}}
{mode display}
}
{description:richtext(richtext),optional
- {label "Description"}
+ {label "[_ bug-tracker.Description]"}
{html {cols 60 rows 13}}
}
{return_url:text(hidden)
@@ -218,7 +220,7 @@
}
# LARS: Hack! How do we set editing of dynamic fields?
- if { [string equal [workflow::action::get_element -action_id $action_id -element short_name] "edit"] } {
+ if { [string equal [workflow::action::get_element -action_id $action_id -element short_name] "[_ acs-kernel.common_edit]"] } {
foreach { category_id category_name } [bug_tracker::category_types] {
element set_properties bug $category_id -mode edit
}
@@ -285,7 +287,7 @@
}
# Display value for patches
- set bug(patches_display) "[bug_tracker::get_patch_links -bug_id $bug(bug_id) -show_patch_status $show_patch_status] \[ Upload a patch \]"
+ set bug(patches_display) "[bug_tracker::get_patch_links -bug_id $bug(bug_id) -show_patch_status $show_patch_status] \[ [_ bug-tracker.Upload_Patch] \]"
# Hide elements that should be hidden depending on the bug status
foreach element $bug(hide_fields) {
@@ -318,15 +320,15 @@
# check that the element exists
if { [info exists bug:$element] && [info exists bug($element)] } {
- if { [form is_request bug] || [string equal [element get_property bug $element mode] "display"] } {
+ if { [form is_request bug] || [string equal [element get_property bug $element mode] "[_ acs-kernel.common_display]" } {
element set_value bug $element $bug($element)
}
}
}
# Add empty option to resolution code
if { ![empty_string_p $enabled_action_id] } {
- if { [lsearch [workflow::action::get_element -action_id $action_id -element edit_fields] "resolution"] == -1 } {
+ if { [lsearch [workflow::action::get_element -action_id $action_id -element edit_fields] "[_ bug-tracker.resolution]"] == -1 } {
element set_properties bug resolution -options [concat {{{} {}}} [element get_property bug resolution options]]
}
} else {
@@ -357,10 +359,11 @@
# TODO: Make real
set filtered_p 1
if { $filtered_p } {
+ set bug_name [bug_tracker::conn bug]
set context [list \
[list \
[export_vars -base . [bug_tracker::get_export_variables]] \
- "Filtered [bug_tracker::conn bug] list"] \
+ "[_ bug-tracker.Filtered]"] \
[ad_quotehtml $page_title]]
} else {
set context [list [ad_quotehtml $page_title]]
@@ -419,31 +422,33 @@
if { $filter_bug_index != -1 } {
+ set next_bug_num [expr $filter_bug_index+1]
+ set all_bugs [llength $filter_bug_numbers]
multirow append navlinks \
$first_url \
"/resources/acs-subsite/stock_first-16.png" \
- "First"
+ "[_ acs-kernel.common_First]"
multirow append navlinks \
$prev_url \
"/resources/acs-subsite/stock_left-16.png" \
- "Previous"
+ "[_ acs-kernel.common_Previous]"
multirow append navlinks \
{} \
{} \
{} \
- "[expr $filter_bug_index+1] of [llength $filter_bug_numbers]"
+ "[_ bug-tracker.No_of_All]"
multirow append navlinks \
$next_url \
"/resources/acs-subsite/stock_right-16.png" \
- "Next"
+ "[_ acs-kernel.common_Next]"
multirow append navlinks \
$last_url \
"/resources/acs-subsite/stock_last-16.png" \
- Last
+ "[_ acs-kernel.common_Last]"
}
}
}
Index: openacs-4/packages/bug-tracker/www/map-patch-to-bugs.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/map-patch-to-bugs.adp,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/bug-tracker/www/map-patch-to-bugs.adp 22 Sep 2003 15:45:10 -0000 1.5
+++ openacs-4/packages/bug-tracker/www/map-patch-to-bugs.adp 29 Mar 2004 15:07:34 -0000 1.6
@@ -3,15 +3,15 @@
@context;noquote@
-Select one or more of the following @pretty_names.bugs@ for patch "@patch_summary@" (you may select more @pretty_names.bugs@ later):
+#bug-tracker.Select_one_or_more_of#
-Components: @component_filter;noquote@
+#bug-tracker.Components_component_filter#
-Bug status: [ @open_filter;noquote@ ]
+#bug-tracker.Bug_status_open_filter#
@@ -26,9 +26,9 @@
|
- Bug Number |
- Summary |
- Creation Date |
+ #bug-tracker.Bug_Number# |
+ #bug-tracker.Summary# |
+ #bug-tracker.Creation_Date# |
@@ -43,7 +43,7 @@
- There are no open @pretty_names.bugs@ to map the patch to. Try changing the component filter above.
+ #bug-tracker.There_are_no_open_to_map#
@@ -61,3 +61,4 @@
+
Index: openacs-4/packages/bug-tracker/www/map-patch-to-bugs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/map-patch-to-bugs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/bug-tracker/www/map-patch-to-bugs.tcl 25 Sep 2003 12:13:37 -0000 1.5
+++ openacs-4/packages/bug-tracker/www/map-patch-to-bugs.tcl 29 Mar 2004 15:07:34 -0000 1.6
@@ -32,7 +32,7 @@
set user_is_submitter_p [expr $user_id == [bug_tracker::get_patch_submitter -patch_number $patch_number]]
if { ![expr $user_is_submitter_p || $write_p] } {
- ad_return_forbidden "Permission Denied" "You do not have permission to map this patch to a bug. Only the submitter of the patch and users with write permission on this Bug Tracker project (package instance) may do so."
+ ad_return_forbidden "[_ bug-tracker.Permission]" "[_ bug-tracker.You_1]"
ad_script_abort
}
@@ -51,7 +51,7 @@
}
set patch_summary [db_string get_patch_summary {}]
-set page_title "Mapping Patch #$patch_number \"$patch_summary\" to a Bug"
+set page_title "[_ bug-tracker.Mapping]"
set context [list "$page_title"]
# Build the component filter
@@ -60,15 +60,19 @@
}
set component_where_clause ""
set component_filter ""
+
+set Component_name [bug_tracker::conn Component]
+set Components_name [bug_tracker::conn Components]
+
if { ![empty_string_p $component_id] } {
set component_name [bug_tracker::component_get_name -component_id $component_id]
set component_filter_url "map-patch-to-bugs?[export_vars -url {patch_number component_id return_url offset show_only_open_p interval_size}]"
if { $show_all_components_p } {
- set component_filter "\[ Only Component \"$component_name\" | All Components \]"
+ set component_filter "\[ [_ bug-tracker.Only]" | [_ bug-tracker.All_1] \]"
} else {
set component_where_clause "\n and bt_bugs.component_id = :component_id"
- set component_filter "\[ Only Component \"$component_name\" | All Components \]"
+ set component_filter "\[ [_ bug-tracker.Only_1] | [_ bug-tracker.All_1] \]"
}
}
@@ -77,8 +81,8 @@
set initial_state_id [workflow::fsm::get_initial_state -workflow_id $workflow_id]
set open_filter_url "map-patch-to-bugs?[export_vars -url {patch_number component_id return_url offset show_all_components_p interval_size}]"
-set only_open_label "Only Open Bugs"
-set any_status_label "Bugs of any Status"
+set only_open_label [_ bug-tracker.Only_2]
+set any_status_label [_ bug-tracker.Bugs]
if { $show_only_open_p } {
set open_where_clause "and cfsm.current_state = :initial_state_id"
set open_filter "$only_open_label | $any_status_label"
Index: openacs-4/packages/bug-tracker/www/no-bugs.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/no-bugs.adp,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/bug-tracker/www/no-bugs.adp 28 Sep 2003 01:28:18 -0000 1.7
+++ openacs-4/packages/bug-tracker/www/no-bugs.adp 29 Mar 2004 15:07:34 -0000 1.8
@@ -3,16 +3,17 @@
@context;noquote@
- This project is empty.
+ #bug-tracker.This_project_is_empty#
- » Project administration
+ » #bug-tracker.Project_administration#
- » Submit a new @pretty_names.bug@
+ » #bug-tracker.Submit_a_new_bug#
+
Index: openacs-4/packages/bug-tracker/www/no-components.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/no-components.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/bug-tracker/www/no-components.adp 28 Sep 2003 01:28:18 -0000 1.6
+++ openacs-4/packages/bug-tracker/www/no-components.adp 29 Mar 2004 15:07:34 -0000 1.7
@@ -2,13 +2,13 @@
@page_title;noquote@
@context;noquote@
-Before you can get started using the bug-tracker, you need to create at least one component.
+#bug-tracker.Before_getting_started#
- Please visit the project administration pages to define software components.
+ #bug-tracker.Please_visit_admin_page#
- Please contact a project administrator to get the components set up.
+ #bug-tracker.Please_contact_admin#
Index: openacs-4/packages/bug-tracker/www/notifications.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/notifications.adp,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/bug-tracker/www/notifications.adp 22 Sep 2003 15:45:10 -0000 1.4
+++ openacs-4/packages/bug-tracker/www/notifications.adp 29 Mar 2004 15:07:34 -0000 1.5
@@ -4,9 +4,9 @@
- Manage your notifications
+ #bug-tracker.Manage_your_notification#
+
Index: openacs-4/packages/bug-tracker/www/notifications.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/notifications.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/bug-tracker/www/notifications.tcl 28 Aug 2003 09:45:29 -0000 1.2
+++ openacs-4/packages/bug-tracker/www/notifications.tcl 29 Mar 2004 15:07:34 -0000 1.3
@@ -4,7 +4,7 @@
bug_number:integer,optional
}
-set page_title "Notifications"
+set page_title [_ bug-tracker.Notifications]
set context [list $page_title]
set workflow_id [bug_tracker::bug::get_instance_workflow_id]
@@ -25,6 +25,8 @@
multirow create notifications url label title subscribed_p
+set bugs_name [bug_tracker::conn bugs]
+
foreach type {
workflow_assignee workflow_my_cases workflow
} {
@@ -36,16 +38,16 @@
if { ![empty_string_p $object_id] } {
switch $type {
workflow_assignee {
- set pretty_name "all [bug_tracker::conn bugs] you're assigned to"
+ set pretty_name [_ bug-tracker.All_2]
}
workflow_my_cases {
- set pretty_name "all [bug_tracker::conn bugs] you're participating in"
+ set pretty_name [_ bug-tracker.All_3]
}
workflow {
- set pretty_name "all [bug_tracker::conn bugs] in this project"
+ set pretty_name [_ bug-tracker.All_4]
}
default {
- error "Unknown type"
+ error "[_ bug-tracker.Unknown_1]"
}
}
@@ -75,7 +77,7 @@
multirow append notifications \
$url \
[string totitle $pretty_name] \
- [ad_decode $subscribed_p 1 "Unsubscribe from $pretty_name" "Subscribe to $pretty_name"] \
+ [ad_decode $subscribed_p 1 "[_ bug-tracker.Unsubscribe_1]" "[_ bug-tracker.Subscribe_1]"] \
$subscribed_p
}
}
Index: openacs-4/packages/bug-tracker/www/patch-add.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/patch-add.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/bug-tracker/www/patch-add.adp 22 Sep 2003 15:45:10 -0000 1.6
+++ openacs-4/packages/bug-tracker/www/patch-add.adp 29 Mar 2004 15:07:34 -0000 1.7
@@ -6,9 +6,10 @@
+
Index: openacs-4/packages/bug-tracker/www/patch-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/patch-add.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/bug-tracker/www/patch-add.tcl 28 Sep 2003 01:28:18 -0000 1.10
+++ openacs-4/packages/bug-tracker/www/patch-add.tcl 29 Mar 2004 15:07:34 -0000 1.11
@@ -30,7 +30,7 @@
set project_name [bug_tracker::conn project_name]
set package_id [ad_conn package_id]
set package_key [ad_conn package_key]
-set page_title "New Patch"
+set page_title [_ bug-tracker.New_2]
set context [list $page_title]
set user_id [ad_conn user_id]
@@ -47,38 +47,38 @@
element create patch component_id \
-datatype integer \
-widget select \
- -label "Component" \
+ -label "[_ bug-tracker.Component]" \
-options [bug_tracker::components_get_options]
element create patch summary \
-datatype text \
- -label "Summary" \
+ -label "[_ bug-tracker.Summary]" \
-html { size 50 }
element create patch description \
-datatype text \
-widget textarea \
- -label "Description" \
+ -label "[_ bug-tracker.Description]" \
-html { cols 50 rows 10 } \
-optional
element create patch description_format \
-datatype text \
-widget select \
- -label "Description format" \
- -options { { "Plain" plain } { "HTML" html } { "Preformatted" pre } }
+ -label "[_ bug-tracker.Description_1]" \
+ -options { { "[_ bug-tracker.Plain]" plain } { "[_ bug-tracker.HTML]" html } { "[_ bug-tracker.Preformatted]" pre } }
element create patch version_id \
-datatype text \
-widget select \
- -label "Generated from Version" \
+ -label "[_ bug-tracker.Generated]" \
-options [bug_tracker::version_get_options -include_unknown] \
-optional
element create patch patch_file \
-datatype file \
-widget file \
- -label "Patch file" \
+ -label "[_ bug-tracker.Patch]" \
if { [exists_and_not_null bug_number] } {
# Export the bug number
@@ -93,7 +93,7 @@
element create patch select_bugs_p \
-datatype text \
-widget radio \
- -label "Choose Bugs for this Patch" \
+ -label "[_ bug-tracker.Choose_1]" \
-options { {Yes 1} {No 0} } \
-values { 1 }
}
Index: openacs-4/packages/bug-tracker/www/patch-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/patch-list.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/bug-tracker/www/patch-list.tcl 28 Sep 2003 01:28:18 -0000 1.7
+++ openacs-4/packages/bug-tracker/www/patch-list.tcl 29 Mar 2004 15:07:34 -0000 1.8
@@ -14,7 +14,10 @@
set package_id [ad_conn package_id]
set user_id [ad_conn user_id]
-set page_title "Patches"
+set Patches_name [bug_tracker::conn Patches]
+set Patch_name [bug_tracker::conn Patch]
+
+set page_title "$Patches_name"
set context [list $page_title]
# TODO: Use bug_tracker::patch_status_pretty for pretty state (problem with the filter, but it can be done)
@@ -24,46 +27,46 @@
-multirow patches \
-elements {
patch_number {
- label "Patch \#"
+ label "[bug_tracker::conn Patch]"
display_template {\#@patches.patch_number@}
html { align right }
}
summary {
- label "Summary"
+ label "[_ bug-tracker.Summary]"
link_url_eval {[export_vars -base patch { patch_number }]}
}
status {
- label "Status"
+ label "[_ bug-tracker.Status]"
display_eval {[string totitle $status]}
}
apply_to_version_name {
- label "Apply To"
+ label "[_ bug-tracker.Apply]"
display_template {
@patches.apply_to_version_name@
Undecided
}
}
component_name {
- label "Component"
+ label "[_ bug-tracker.Component]"
}
creation_date_pretty {
- label "Submitted"
+ label "[_ bug-tracker.Submitted]"
}
} -filters {
status {
- label "Status"
+ label "[_ bug-tracker.Status]"
values {[db_list_of_lists select_states {}]}
where_clause {[db_map states_where_clause]}
}
apply_to_version {
- label "Apply to version"
+ label "[_ bug-tracker.Apply_1]"
values {[db_list_of_lists select_versions {}]}
where_clause {[db_map apply_to_version_where_clause]}
null_where_clause {[db_map apply_to_version_null_where_clause]}
null_label {Undecided}
}
component_id {
- label "Component"
+ label "[_ bug-tracker.Component]"
values {[db_list_of_lists select_components {
}]}
where_clause {[db_map component_where_clause]}
Index: openacs-4/packages/bug-tracker/www/patch.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/patch.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/bug-tracker/www/patch.adp 25 Mar 2004 22:06:25 -0000 1.6
+++ openacs-4/packages/bug-tracker/www/patch.adp 29 Mar 2004 15:07:34 -0000 1.7
@@ -21,7 +21,7 @@
-Download patch content
+#bug-tracker.Download_patch_content#
@@ -35,7 +35,7 @@
-Download patch content
+#bug-tracker.Download_patch_content#
@@ -46,3 +46,4 @@
+
Index: openacs-4/packages/bug-tracker/www/patch.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/patch.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/bug-tracker/www/patch.tcl 27 Mar 2004 13:15:30 -0000 1.8
+++ openacs-4/packages/bug-tracker/www/patch.tcl 29 Mar 2004 15:07:34 -0000 1.9
@@ -57,19 +57,19 @@
# We are in view mode per default
if { ![info exists mode] } {
if { [exists_and_not_null edit] } {
- set mode "edit"
+ set mode "[_ bug-tracker.edit]"
} elseif { [exists_and_not_null accept] } {
- set mode "accept"
+ set mode "[_ bug-tracker.accept]"
} elseif { [exists_and_not_null refuse] } {
- set mode "refuse"
+ set mode "[_ bug-tracker.refuse]"
} elseif { [exists_and_not_null delete] } {
- set mode "delete"
+ set mode "[_ bug-tracker.delete]"
} elseif { [exists_and_not_null reopen] } {
- set mode "reopen"
+ set mode "[_ bug-tracker.reopen]"
} elseif { [exists_and_not_null comment] } {
- set mode "comment"
+ set mode "[_ bug-tracker.comment]"
} else {
- set mode "view"
+ set mode "[_ bug-tracker.view]"
}
}
@@ -78,7 +78,7 @@
switch -- $mode {
edit {
if { ![expr $write_p || $user_is_submitter_p] } {
- ad_return_forbidden "Permission Denied" "You do not have permission to edit this patch. Only the submitter of the patch and users with write permission on the Bug Tracker project (package instance) may do so."
+ ad_return_forbidden "[_ bug-tracker.Permission]" "[_ bug-tracker.You_2]"
ad_script_abort
}
@@ -97,11 +97,11 @@
}
reopen {
# User must have write permission to reopen a refused patch
- if { [string equal $patch_status "refused"] && !$write_p } {
- ad_return_forbidden "Permission Denied" "You do not have permission to reopen this refused patch, only users with write permission on the Bug Tracker package instance (project) may do so."
+ if { [string equal $patch_status "[_ bug-tracker.refused]"] && !$write_p } {
+ ad_return_forbidden "[_ bug-tracker.Permission]" "[_ bug-tracker.You_3]"
ad_script_abort
- } elseif { [string equal $patch_status "deleted"] && !($user_is_submitter_p || $write_p)} {
- ad_return_forbidden "Permission Denied" "You do not have permission to reopen this deleted patch, only users with write permission on the Bug Tracker package instance (project) and the submitter of the patch may do so."
+ } elseif { [string equal $patch_status "[_ bug-tracker.deleted]"] && !($user_is_submitter_p || $write_p)} {
+ ad_return_forbidden "[_ bug-tracker.Permission]" "[_ bug-tracker.You_4]"
ad_script_abort
}
@@ -110,7 +110,7 @@
delete {
# Only the submitter can delete a patch (admins can refuse it)
if { !$user_is_submitter_p } {
- ad_return_forbidden "Permission Denied" "You do not have permission to cancel this patch - only the submitter of the patch may do so. If you are an administrator you can however refuse the patch."
+ ad_return_forbidden "[_ bug-tracker.Permission]" "[_ bug-tracker.You_5]"
ad_script_abort
}
set edit_fields {}
@@ -127,7 +127,7 @@
set field_editable_p($field) 1
}
-if { ![string equal $mode "view"] } {
+if { ![string equal $mode "[_ bug-tracker.view]"] } {
ad_maybe_redirect_for_registration
}
@@ -151,55 +151,55 @@
element create patch patch_number_i \
-datatype integer \
-widget inform \
- -label "Patch #"
+ -label "[_ bug-tracker.Patch_1]"
element create patch component_id \
-datatype text \
-widget [ad_decode [info exists field_editable_p(component_id)] 1 select inform] \
- -label "Component" \
+ -label "[_ bug-tracker.Component]" \
-options [bug_tracker::components_get_options]
-if { [string equal $mode "view"] } {
+if { [string equal $mode "[_ bug-tracker.view]"] } {
element create patch fixes_bugs \
-datatype text \
-widget inform \
- -label "Fix for Bugs"
+ -label "[_ bug-tracker.Fix_2]"
}
element create patch summary \
-datatype text \
-widget [ad_decode [info exists field_editable_p(summary)] 1 text inform] \
- -label "Summary" \
+ -label "[_ bug-tracker.Summary]" \
-html { size 50 }
element create patch submitter \
-datatype text \
-widget inform \
- -label "Submitted by"
+ -label "[_ bug-tracker.Submitted]"
element create patch status \
-widget inform \
-datatype text \
- -label "Status"
+ -label "[_ bug-tracker.Status]"
element create patch generated_from_version \
-datatype text \
-widget [ad_decode [info exists field_editable_p(generated_from_version)] 1 select inform] \
- -label "Generated from Version" \
+ -label "[_ bug-tracker.Generated]" \
-options [bug_tracker::version_get_options -include_unknown] \
-optional
element create patch apply_to_version \
-datatype text \
-widget [ad_decode [info exists field_editable_p(apply_to_version)] 1 select inform] \
- -label "Apply to Version" \
+ -label "[_ bug-tracker.Apply_2]" \
-options [bug_tracker::version_get_options -include_undecided] \
-optional
element create patch applied_to_version \
-datatype text \
-widget [ad_decode [info exists field_editable_p(applied_to_version)] 1 select inform] \
- -label "Applied to Version" \
+ -label "[_ bug-tracker.Applied]" \
-options [bug_tracker::version_get_options -include_undecided] \
-optional
@@ -208,44 +208,44 @@
element create patch description \
-datatype text \
-widget comment \
- -label "Description" \
+ -label "[_ bug-tracker.Description]" \
-html { cols 60 rows 13 } \
-optional
element create patch desc_format \
-datatype text \
-widget select \
- -label "Description format" \
- -options { { "Plain" plain } { "HTML" html } { "Preformatted" pre } }
+ -label "[_ bug-tracker.Description_1]" \
+ -options { { "[_ bug-tracker.Plain]" plain } { "[_ bug-tracker.HTML]" html } { "[_ bug-tracker.Preformatted]" pre } }
}
default {
# View mode
element create patch description \
-datatype text \
-widget inform \
- -label "Description"
+ -label "[_ bug-tracker.Description]"
}
}
# In accept mode - give the user the ability to select associated
# bugs to be resolved
-if { [string equal $mode "accept"] } {
+if { [string equal $mode "[_ bug-tracker.accept]"] } {
element create patch resolve_bugs \
-datatype integer \
-widget checkbox \
- -label "Resolve Bugs" \
+ -label "[_ bug-tracker.Resolve_1]" \
-options [bug_tracker::get_mapped_bugs -patch_number $patch_number -only_open_p 1] \
-optional
}
-if { [string equal $mode "edit"] } {
+if { [string equal $mode "[_ bug-tracker.edit]"] } {
# Edit mode - display the file upload widget for patch content
element create patch patch_file \
-datatype file \
-widget file \
- -label "Patch file (leave blank to keep current file):" \
+ -label "[_ bug-tracker.Patch_2]" \
-optional
}
@@ -254,15 +254,16 @@
-widget hidden \
-value $mode
-set page_title "Patch #$patch_number"
-set context [list [list "patch-list" "Patches"] $page_title]
+set page_title [_ bug-tracker.Patch_3]
+set Patches_name [bug_tracker::conn Patches]
+set context [list [list "patch-list" "$Patches_name"] $page_title]
if { [form is_request patch] } {
# The form was requested
db_1row patch {} -column_array patch
- set patch(generated_from_version_name) [ad_decode $patch(generated_from_version) "" "Unknown" [bug_tracker::version_get_name -version_id $patch(generated_from_version)]]
- set patch(apply_to_version_name) [ad_decode $patch(apply_to_version) "" "Undecided" [bug_tracker::version_get_name -version_id $patch(apply_to_version)]]
+ set patch(generated_from_version_name) [ad_decode $patch(generated_from_version) "" "[_ bug-tracker.Unknown]" [bug_tracker::version_get_name -version_id $patch(generated_from_version)]]
+ set patch(apply_to_version_name) [ad_decode $patch(apply_to_version) "" "[_ bug-tracker.Undecided]" [bug_tracker::version_get_name -version_id $patch(apply_to_version)]]
set patch(applied_to_version_name) [bug_tracker::version_get_name -version_id $patch(applied_to_version)]
if {$user_id != 0} {
@@ -275,16 +276,16 @@
# - update the status (the new status will show up in the form)
switch -- $mode {
accept {
- set patch(status) "accepted"
+ set patch(status) "[_ bug-tracker.accepted]"
}
refuse {
- set patch(status) "refused"
+ set patch(status) "[_ bug-tracker.refused]"
}
delete {
- set patch(status) "deleted"
+ set patch(status) "[_ bug-tracker.deleted]"
}
reopen {
- set patch(status) "open"
+ set patch(status) "[_ bug-tracker.open]"
}
}
@@ -294,8 +295,10 @@
-value $patch(patch_number)
element set_properties patch component_id \
-value [ad_decode [info exists field_editable_p(component_id)] 1 $patch(component_id) $patch(component_name)]
- if { [string equal $mode "view"] } {
- set map_new_bug_link [ad_decode $write_or_submitter_p "1" "\[ Map to bugs \]" ""]
+ if { [string equal $mode "[_ bug-tracker.view]"] } {
+ set bugs_name [bug_tracker::conn bugs]
+ set map_to_bugs [_ bug-tracker.Map]
+ set map_new_bug_link [ad_decode $write_or_submitter_p "1" "\[ $map_to_bugs \]" ""]
element set_properties patch fixes_bugs \
-value "[bug_tracker::get_bug_links -patch_id $patch(patch_id) -patch_number $patch(patch_number) -write_or_submitter_p $write_or_submitter_p]
$map_new_bug_link"
}
@@ -317,7 +320,7 @@
set deleted_p [string equal $patch(status) deleted]
- if { ( [string equal $patch(status) open] && ![string equal $mode "accept"]) || [string equal $patch(status) "refused"] } {
+ if { ( [string equal $patch(status) open] && ![string equal $mode [_ bug-tracker.accept]]) || [string equal $patch(status) [_ bug-tracker.refused]] } {
element set_properties patch applied_to_version -widget hidden
}
@@ -330,65 +333,73 @@
[bug_tracker::bug_convert_comment_to_html -comment $comment -format $comment_format]
"
}
- if { [string equal $mode "view"] } {
+ if { [string equal $mode "[_ bug-tracker.view]"] } {
element set_properties patch description -value $action_html
} else {
+
+ set patch_pretty_name "$patch(now_pretty)"
+ set patch_action_pretty_mode [bug_tracker::patch_action_pretty $mode]
+ set bt_user_first_names [bug_tracker::conn user_first_names]
+ set bt_user_last_name [bug_tracker::conn user_last_name]
+
element set_properties patch description \
-history $action_html \
- -header "$patch(now_pretty) [bug_tracker::patch_action_pretty $mode] by [bug_tracker::conn user_first_names] [bug_tracker::conn user_last_name]" \
+ -header "[_ bug-tracker.%patch_pretty_name% %patch_action_pretty_mode% by %bt_user_first_names% %bt_user_last_name%]" \
-value ""
}
# Now that we have the patch summary we can make the page title more informative
- set page_title "Patch #$patch_number: $patch(summary)"
+ set Patch_name [bug_tracker::conn Patch]
+ set page_title "[_ bug-tracker.Patch_4]"
+
# Create the buttons
# If the user has submitted the patch he gets full write access on the patch
set user_is_submitter_p [expr $patch(submitter_user_id) == [ad_conn user_id]]
- if { [string equal $mode "view"] } {
+ if { [string equal $mode "[_ bug-tracker.view]"] } {
set button_form_export_vars [export_vars -form { patch_number }]
multirow create button name label
if { $write_p || $user_is_submitter_p } {
- multirow append button "comment" "Comment"
- multirow append button "edit" "Edit"
+ multirow append button "comment" "[_ bug-tracker.Comment]"
+ multirow append button "edit" "[_ bug-tracker.Edit]"
}
switch -- $patch(status) {
open {
if { $write_p } {
- multirow append button "accept" "Accept"
- multirow append button "refuse" "Refuse"
+ multirow append button "accept" "[_ bug-tracker.Accept]"
+ multirow append button "refuse" "[_ bug-tracker.Refuse]"
}
# Only the submitter can cancel the patch
if { $user_is_submitter_p } {
- multirow append button "delete" "Delete"
+ multirow append button "delete" "[_ bug-tracker.Delete]"
}
}
accepted {
if { $write_p } {
- multirow append button "reopen" "Reopen"
+ multirow append button "reopen" "[_ bug-tracker.Reopen]"
}
}
refused {
if { $write_p } {
- multirow append button "reopen" "Reopen"
+ multirow append button "reopen" "[_ bug-tracker.Reopen]"
}
}
deleted {
if { $write_p || $user_is_submitter_p } {
- multirow append button "reopen" "Reopen"
+ multirow append button "reopen" "[_ bug-tracker.Reopen]"
}
}
}
}
# Check that the user is permitted to change the patch
- if { ![string equal $mode "view"] && !$write_p && !$user_is_submitter_p } {
+ if { ![string equal $mode "[_ bug-tracker.view]"] && !$write_p && !$user_is_submitter_p } {
ns_log notice "$patch(submitter_user_id) doesn't have write on object $patch(patch_id)"
- ad_return_forbidden "Permission Denied" "
- You don't have permission to edit this patch.
+ ad_return_forbidden "[_ bug-tracker.Permission]" "
+ [_ bug-tracker.You_6]
"
ad_script_abort
}
@@ -415,15 +426,15 @@
switch -- $mode {
accept {
- set status "accepted"
+ set status "[_ bug-tracker.accepted]"
lappend update_exprs "status = :status"
}
refuse {
- set status "refused"
+ set status "[_ bug-tracker.refused]"
lappend update_exprs "status = :status"
}
reopen {
- set status "open"
+ set status "[_ bug-tracker.open]"
lappend update_exprs "status = :status"
}
edit {
@@ -435,7 +446,7 @@
}
}
delete {
- set status "deleted"
+ set status "[_ bug-tracker.deleted]"
lappend update_exprs "status = :status"
}
}
@@ -458,17 +469,16 @@
set action $mode
db_dml patch_action {}
- if { [string equal $mode "accept"] } {
+ if { [string equal $mode "[_ bug-tracker.accept]"] } {
# Resolve any bugs that the user selected
set resolve_bugs [element get_values patch resolve_bugs]
foreach bug_number $resolve_bugs {
- set resolve_description "Fixed by patch #$patch_number"
-
+ set resolve_description "[_ bug-tracker.Fixed_2]"
set workflow_id [bug_tracker::bug::get_instance_workflow_id]
set bug_id [bug_tracker::get_bug_id -bug_number $bug_number -project_id $package_id]
- set action_id [workflow::action::get_id -workflow_id $workflow_id -short_name "resolve"]
+ set action_id [workflow::action::get_id -workflow_id $workflow_id -short_name "[_ bug-tracker.resolve]"]
bug_tracker::bug::edit \
-bug_id $bug_id \
Index: openacs-4/packages/bug-tracker/www/prefs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/prefs.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/bug-tracker/www/prefs.tcl 28 Aug 2003 09:45:29 -0000 1.9
+++ openacs-4/packages/bug-tracker/www/prefs.tcl 29 Mar 2004 15:07:34 -0000 1.10
@@ -19,15 +19,15 @@
set package_id [ad_conn package_id]
set package_key [ad_conn package_key]
-set page_title "Your Preferences"
+set page_title "[_ bug-tracker.Your]"
set context [list $page_title]
set user_id [ad_conn user_id]
ad_form -name prefs -cancel_url $return_url -form {
{user_version:integer(select),optional
- {label "Your version"}
+ {label "[_ bug-tracker.Your_1]"}
{options {[bug_tracker::version_get_options -include_unknown]}}
}
{return_url:text(hidden)
Index: openacs-4/packages/bug-tracker/www/unmap-patch-from-bug.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/unmap-patch-from-bug.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/bug-tracker/www/unmap-patch-from-bug.tcl 25 Sep 2003 12:13:37 -0000 1.2
+++ openacs-4/packages/bug-tracker/www/unmap-patch-from-bug.tcl 29 Mar 2004 15:07:34 -0000 1.3
@@ -16,7 +16,7 @@
set user_is_submitter_p [expr $user_id == [bug_tracker::get_patch_submitter -patch_number $patch_number]]
if { ![expr $user_is_submitter_p || $write_p] } {
- ad_return_forbidden "Permission Denied" "You do not have permission to unmap a bug from this patch. Only the submitter of the patch and users with write permission on the Bug Tracker package instance (project) may do so."
+ ad_return_forbidden "[_ bug-tracker.Permission]" "[_ bug-tracker.You_7]"
ad_script_abort
}
Index: openacs-4/packages/bug-tracker/www/admin/categories.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/categories.adp,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/bug-tracker/www/admin/categories.adp 22 Sep 2003 15:45:11 -0000 1.4
+++ openacs-4/packages/bug-tracker/www/admin/categories.adp 29 Mar 2004 15:07:35 -0000 1.5
@@ -7,12 +7,12 @@
»
- Use default setup
+ #bug-tracker.Use_default_setup#
+
Index: openacs-4/packages/bug-tracker/www/admin/categories.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/categories.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/bug-tracker/www/admin/categories.tcl 5 Mar 2003 17:41:17 -0000 1.1
+++ openacs-4/packages/bug-tracker/www/admin/categories.tcl 29 Mar 2004 15:07:35 -0000 1.2
@@ -3,7 +3,7 @@
}
set project_name [bug_tracker::conn project_name]
-set page_title "Manage Categories"
+set page_title "[_ bug-tracker.Manage_Categories]"
set context_bar [ad_context_bar $page_title]
set package_id [ad_conn package_id]
Index: openacs-4/packages/bug-tracker/www/admin/category-defaults.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/category-defaults.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/bug-tracker/www/admin/category-defaults.tcl 5 Mar 2003 17:41:17 -0000 1.1
+++ openacs-4/packages/bug-tracker/www/admin/category-defaults.tcl 29 Mar 2004 15:07:35 -0000 1.2
@@ -3,8 +3,8 @@
}
set project_name [bug_tracker::conn project_name]
-set page_title "Default Category Setup"
-set context_bar [ad_context_bar [list categories "Manage Categories"] $page_title]
+set page_title [_ bug-tracker.lt_Default_Category_Setu]
+set context_bar [ad_context_bar [list categories [_ bug-tracker.Manage_Categories]] $page_title]
array set default_configs [bug_tracker::get_default_configurations]
@@ -15,7 +15,7 @@
}
ad_form -name setup -cancel_url categories -form {
- {setup:text(select) {label "Choose setup"} {options $options}}
+ {setup:text(select) {label [_ bug-tracker.Choose_setup]} {options $options}}
} -on_submit {
array set config $default_configs($setup)
Index: openacs-4/packages/bug-tracker/www/admin/category-edit.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/category-edit.adp,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/bug-tracker/www/admin/category-edit.adp 26 Sep 2003 06:42:23 -0000 1.5
+++ openacs-4/packages/bug-tracker/www/admin/category-edit.adp 29 Mar 2004 15:07:35 -0000 1.6
@@ -6,7 +6,4 @@
- Note: Categories are sorted by their
-names. Therefore, it's a good idea to use names of ths form "1 -
-High", "2 - Normal", etc., or "A - Critical",
-"B - Major", etc., thus making the order obvious.
+ #bug-tracker.Sort_Order_Note#
Index: openacs-4/packages/bug-tracker/www/admin/category-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/category-edit.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/bug-tracker/www/admin/category-edit.tcl 5 Mar 2003 17:41:17 -0000 1.1
+++ openacs-4/packages/bug-tracker/www/admin/category-edit.tcl 29 Mar 2004 15:07:35 -0000 1.2
@@ -9,19 +9,19 @@
set project_name [bug_tracker::conn project_name]
if { (![info exists keyword_id] && ![info exists parent_id]) || [string equal $type_p "t"] } {
- set object_type_name "Category Type"
+ set object_type_name [_ bug-tracker.Category_Type]
} else {
- set object_type_name "Category"
+ set object_type_name [_ bug-tracker.Category]
}
if { [info exists keyword_id] } {
- set function "Edit"
+ set function [_ acs-kernel.common_Edit]
} else {
- set function "Add"
+ set function [_ acs-kernel.common_Add]
}
-set page_title "$function $object_type_name"
-set context_bar [ad_context_bar [list categories "Manage Categories"] $page_title]
+set page_title [_ bug-tracker.function]
+set context_bar [ad_context_bar [list categories [_ bug-tracker.Manage_Categories]] $page_title]
ad_form -name keyword -cancel_url categories -form {
Index: openacs-4/packages/bug-tracker/www/admin/component-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/component-ae.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/bug-tracker/www/admin/component-ae.tcl 28 Aug 2003 09:45:30 -0000 1.9
+++ openacs-4/packages/bug-tracker/www/admin/component-ae.tcl 29 Mar 2004 15:07:35 -0000 1.10
@@ -8,28 +8,31 @@
}
set package_id [ad_conn package_id]
+set Component_name [bug_tracker::conn Component]
+set component_name [bug_tracker::conn component]
if { [info exists component_id] } {
- set page_title "Edit [bug_tracker::conn Component]"
+ set page_title [_ bug-tracker.Edit_1]
} else {
- set page_title "Add [bug_tracker::conn Component]"
+ set page_title [_ bug-tracker.Add]
}
set context [list $page_title]
# LARS:
# I've hidden the description, because we don't use it anywhere
+set filter_url_string "[ad_conn package_url]com/this-name/"
ad_form -name component -cancel_url $return_url -form {
{component_id:key(acs_object_id_seq)}
{return_url:text(hidden) {value $return_url}}
- {name:text {html { size 50 }} {label "[bug_tracker::conn Component] Name"}}
+ {name:text {html { size 50 }} {label "[_ bug-tracker.Component]"}}
{description:text(hidden),optional {label {Description}} {html { cols 50 rows 8 }}}
- {url_name:text,optional {html { size 50 }} {label {Name in shortcut URL}}
- {help_text "You can filter by this [bug_tracker::conn component] by viisting [ad_conn package_url]com/this-name/"}
+ {url_name:text,optional {html { size 50 }} {label {[_ bug-tracker.Name_in_shortcut_URL]}}
+ {help_text "[_ bug-tracker.You]"}
}
{maintainer:search,optional
{result_datatype integer}
- {label "Maintainer"}
+ {label "[_ bug-tracker.Maintainer]"}
{options [bug_tracker::users_get_options]}
{search_query {[db_map user_search]}}
}
Index: openacs-4/packages/bug-tracker/www/admin/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/index.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/bug-tracker/www/admin/index.adp 22 Sep 2003 15:45:11 -0000 1.6
+++ openacs-4/packages/bug-tracker/www/admin/index.adp 29 Mar 2004 15:07:35 -0000 1.7
@@ -7,10 +7,10 @@
@@ -20,38 +20,38 @@
|
- Edit
+ #acs-kernel.common_Edit#
|
- Delete
+ #acs-kernel.common_Delete#
|
@project_name@
|
-
+
|
|
- Maintainer:
+ #bug-tracker.Maintainer#
@project.maintainer_first_names@ @project.maintainer_last_name@
- No Maintainer
+ #bug-tracker.No_Maintainer#
|
|
-
+
|
@@ -61,10 +61,10 @@
- Versions
+ #bug-tracker.Versions#
|
-
+
|
@@ -74,32 +74,32 @@
|
- Categories
+ #bug-tracker.Categories#
|
-
+
|
|
- Permissions
+ #bug-tracker.Permissions#
|
-
+
|
|
- Parameters
+ #bug-tracker.Parameters#
|
-
+
|
@@ -110,21 +110,21 @@
| |