Index: openacs-4/packages/acs-templating/tcl/acs-integration-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/acs-integration-procs.tcl,v diff -u -r1.27.2.1 -r1.27.2.2 --- openacs-4/packages/acs-templating/tcl/acs-integration-procs.tcl 17 Jun 2019 10:14:25 -0000 1.27.2.1 +++ openacs-4/packages/acs-templating/tcl/acs-integration-procs.tcl 29 Jul 2019 20:08:22 -0000 1.27.2.2 @@ -158,17 +158,17 @@ { locale {[ad_conn locale]} } package_key message_key { return_url [ad_return_url] } }] if { [lang::message::message_exists_p [ad_conn locale] $key] } { - set edit_link [subst {o}] + set edit_link [subst {}] } else { if { [lang::message::message_exists_p "en_US" $key] } { # Translation missing in this locale - set edit_link [subst {*}] + set edit_link [subst {}] } else { # Message key missing entirely set new_url [export_vars -base "${apm_package_url}admin/localized-message-new" { { locale en_US } package_key message_key { return_url [ad_return_url] } }] - set edit_link [subst {@}] + set edit_link [subst {}] } } Index: openacs-4/packages/openacs-bootstrap3-theme/www/resources/css/main.css =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/openacs-bootstrap3-theme/www/resources/css/main.css,v diff -u -r1.2.2.2 -r1.2.2.3 --- openacs-4/packages/openacs-bootstrap3-theme/www/resources/css/main.css 28 Jul 2019 17:34:36 -0000 1.2.2.2 +++ openacs-4/packages/openacs-bootstrap3-theme/www/resources/css/main.css 29 Jul 2019 20:08:23 -0000 1.2.2.3 @@ -242,3 +242,24 @@ div.content pre { white-space: pre-wrap; } + +a.acs-lang-localized, +a.acs-lang-us_only, +a.acs-lang-missing { + padding: 0px 0px 0px 0px !important; +} +a.acs-lang-localized::after { + color: green; + font-family: 'Glyphicons Halflings'; + content: "\e013"; /* glyphicon-ok */ +} +a.acs-lang-us_only::after { + color: orange; + font-family: 'Glyphicons Halflings'; + content: "\e136"; /* glyphicon-wrench */ +} +a.acs-lang-missing::after { + color: red; + font-family: 'Glyphicons Halflings'; + content: "\e209"; /* glyphicon-alert */ +} Index: openacs-4/packages/openacs-default-theme/www/resources/styles/default-master.css =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/openacs-default-theme/www/resources/styles/default-master.css,v diff -u -r1.16 -r1.16.2.1 --- openacs-4/packages/openacs-default-theme/www/resources/styles/default-master.css 28 Mar 2018 17:00:41 -0000 1.16 +++ openacs-4/packages/openacs-default-theme/www/resources/styles/default-master.css 29 Jul 2019 20:08:23 -0000 1.16.2.1 @@ -721,7 +721,31 @@ text-align: center; } +a.acs-lang-localized, +a.acs-lang-us_only, +a.acs-lang-missing { + padding: 1px 1px 1px 1px; + text-decoration: none; + border: 1px solid red; +} +a.acs-lang-localized::after { + color: green; + font-weight: bold; + content: "o"; +} +a.acs-lang-us_only::after { + color: orange; + font-weight: bold; + content: "*"; +} +a.acs-lang-missing::after { + color: red; + font-weight: bold; + content: "*"; +} + + /********************************************************************** /* DEPRECATED CLASSES /**********************************************************************/ Index: openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl,v diff -u -r1.70.2.6 -r1.70.2.7 --- openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl 29 Jul 2019 17:13:26 -0000 1.70.2.6 +++ openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl 29 Jul 2019 20:08:22 -0000 1.70.2.7 @@ -305,28 +305,36 @@ Class create Localizer -parameter {type key url} + #Localizer instproc render {} { + # html::a -title [:key] -href [:url] { + # switch -- [:type] { + # localized {set char o; set style "color: green"} + # us_only {set char *; set style "background-color: yellow; color: red;"} + # missing {set char @; set style "background-color: red; color: white;"} + # } + # html::span -style $style {html::t $char} + # } + #} + #Localizer instproc render {} { + # html::a -title [:key] -href [:url] { + # set path /resources/acs-templating/xinha-nightly/plugins/ + # switch -- [:type] { + # localized {set img ImageManager/img/btn_ok.gif} + # us_only {set img Filter/img/ed_filter.gif} + # missing {set img LangMarks/img/en.gif} + # } + # html::img -alt [:type] -src $path/$img -width 16 -height 16 -border 0 + # } + #} Localizer instproc render {} { - html::a -title [:key] -href [:url] { - switch -- [:type] { - localized {set char o; set style "color: green"} - us_only {set char *; set style "background-color: yellow; color: red;"} - missing {set char @; set style "background-color: red; color: white;"} - } - html::span -style $style {html::t $char} + switch -- ${:type} { + localized {set img ImageManager/img/btn_ok.gif} + us_only {set img Filter/img/ed_filter.gif} + missing {set img LangMarks/img/en.gif} } - } - Localizer instproc render {} { - html::a -title [:key] -href [:url] { - set path /resources/acs-templating/xinha-nightly/plugins/ - switch -- [:type] { - localized {set img ImageManager/img/btn_ok.gif} - us_only {set img Filter/img/ed_filter.gif} - missing {set img LangMarks/img/en.gif} - } - html::img -alt [:type] -src $path/$img -width 16 -height 16 -border 0 - } - } - + html::a -class "acs-lang-${:type}" -title ${:key} -href ${:url} {} + } + ## todo : make these checks only in trn mode (additional mixin) Class create Drawable \