bug_tracker::patch_status_pretty (public)

 bug_tracker::patch_status_pretty status

Defined in packages/bug-tracker/tcl/bug-tracker-procs.tcl

Parameters:
status (required)

Partial Call Graph (max 5 caller/called nodes):
%3 packages/bug-tracker/www/patch.tcl packages/bug-tracker/ www/patch.tcl bug_tracker::patch_status_pretty bug_tracker::patch_status_pretty packages/bug-tracker/www/patch.tcl->bug_tracker::patch_status_pretty _ _ (public) bug_tracker::patch_status_pretty->_

Testcases:
No testcase defined.
Source code:
    array set status_codes {
        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)]
    } else {
        return {}
    }
Generic XQL file:
packages/bug-tracker/tcl/bug-tracker-procs.xql

PostgreSQL XQL file:
packages/bug-tracker/tcl/bug-tracker-procs-postgresql.xql

Oracle XQL file:
packages/bug-tracker/tcl/bug-tracker-procs-oracle.xql

[ hide source ] | [ make this the default ]
Show another procedure: