Bwidget Source Code
Check-in [b19b621e2a]
Not logged in
Bounty program for improvements to Tcl and certain Tcl packages.
Tcl 2019 Conference, Houston/TX, US, Nov 4-8
Send your abstracts to tclconference@googlegroups.com
or submit via the online form by Sep 9.

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:add support to msgcat -- closed because become invalid
Timelines: family | ancestors | msgcat
Files: files | file ages | folders
SHA3-256:b19b621e2afa04a449a4619aa99f8178abbf7d0743d82940f138a704e4ed0d4c
User & Date: pd 2018-02-07 16:58:58
Original Comment: add support to msgcat
Context
2018-02-07
16:58
add support to msgcat -- closed because become invalid Closed-Leaf check-in: b19b621e2a user: pd tags: msgcat
2010-12-14
17:01
* tree.tcl [Bug 3106208]: Followup. Moved the fixed code of the last entry I did (2010-11-09) into a new command Tree::MergeFlag and call this from both Tree::itemconfigure and Tree::insert. Missing the place in Tree::insert caused another problem, found by Dustin Littau. Leaf check-in: c3b144fc1f user: andreas_kupries tags: trunk, tcllib-1-13, tcllib-1-14
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to demo/demo.tcl.

     6      6   #  demo.tcl
     7      7   #  This file is part of Unifix BWidget Toolkit
     8      8   #  $Id: demo.tcl,v 1.7 2009/10/25 20:53:58 oberdorfer Exp $
     9      9   # ----------------------------------------------------------------------------
    10     10   #
    11     11   
    12     12   set appDir [file dirname [info script]]
    13         -lappend auto_path [file join $appDir ".."]
           13  +#lappend auto_path [file join $appDir ".."]
           14  +set auto_path [linsert $auto_path 0 [file join $appDir ".."]]
    14     15   
    15         -package require BWidget 1.9.1
           16  +package require -exact BWidget 1.9.1
    16     17   
    17     18   ::BWidget::use \
    18     19       -setoptdb  yes
    19     20   
    20     21   
    21     22   source [file join $appDir "demo_main.tcl"]
    22     23   
    23     24   Demo::main
    24     25   Demo::setTheme
    25     26   
    26     27   wm geom . [wm geom .]

Changes to demo/tmpldlg.tcl.

    19     19   
    20     20       set titf1 [TitleFrame $frame.titf1 -text "Resources"]
    21     21       set titf2 [TitleFrame $frame.titf2 -text "Template Dialog"]
    22     22       set titf3 [TitleFrame $frame.titf3 -text "Message Dialog"]
    23     23       set titf4 [TitleFrame $frame.titf4 -text "Other dialog"]
    24     24   
    25     25       set subf [$titf1 getframe]
    26         -    set cmd  {option read [file join $::BWIDGET::LIBRARY "lang" $DemoDlg::resources.rc]}
           26  +#    set cmd  {option read [file join $::BWIDGET::LIBRARY "lang" $DemoDlg::resources.rc]}
           27  +    set cmd  {BWidget::changeLang $DemoDlg::resources}
    27     28       set rad1 [BWidget::wrap radiobutton $subf.rad1 -text "English" \
    28     29                     -variable DemoDlg::resources -value en \
    29     30                     -command  $cmd]
    30     31       set rad2 [BWidget::wrap radiobutton $subf.rad2 -text "French" \
    31     32                     -variable DemoDlg::resources -value fr \
    32     33                     -command  $cmd]
    33     34       set rad3 [BWidget::wrap radiobutton $subf.rad3 -text "German" \
    34     35                     -variable DemoDlg::resources -value de \
    35     36                     -command  $cmd]
    36         -    pack $rad1 $rad2 $rad3 -side left -padx 5
           37  +    set rad4 [BWidget::wrap radiobutton $subf.rad4 -text "Spanish" \
           38  +                  -variable DemoDlg::resources -value es \
           39  +                  -command  $cmd]
           40  +    set rad5 [BWidget::wrap radiobutton $subf.rad5 -text "Polish" \
           41  +                  -variable DemoDlg::resources -value pl \
           42  +                  -command  $cmd]
           43  +    set rad6 [BWidget::wrap radiobutton $subf.rad6 -text "Hungarian" \
           44  +                  -variable DemoDlg::resources -value hu \
           45  +                  -command  $cmd]
           46  +    set rad7 [BWidget::wrap radiobutton $subf.rad7 -text "Norwegian" \
           47  +                  -variable DemoDlg::resources -value no \
           48  +                  -command  $cmd]
           49  +    set rad8 [BWidget::wrap radiobutton $subf.rad8 -text "Nederlans" \
           50  +                  -variable DemoDlg::resources -value nl \
           51  +                  -command  $cmd]
           52  +    pack $rad1 $rad2 $rad3 $rad4 $rad5 $rad6 $rad7 $rad8 -side left -padx 5
    37     53   
    38     54       _tmpldlg [$titf2 getframe]
    39     55       _msgdlg  [$titf3 getframe]
    40     56       _stddlg  [$titf4 getframe]
    41     57   
    42     58       pack $titf1 -fill x -pady 2 -padx 2
    43     59       pack $titf4 -side bottom -fill x -pady 2 -padx 2

Changes to init.tcl.

    30     30   	    option add *MainFrame.relief	raised $prio
    31     31   	    option add *MainFrame.separator	none   $prio
    32     32   	}
    33     33       }
    34     34   }
    35     35   Widget::_opt_defaults
    36     36   
    37         -option read [file join $::BWIDGET::LIBRARY "lang" "en.rc"]
           37  +
           38  +if {[catch {package require msgcat}]} {
           39  +	# Error thrown - package not found.
           40  +	option read [file join $::BWIDGET::LIBRARY "lang" "en.rc"]
           41  +} else {
           42  +	# package loaded
           43  +	namespace import msgcat::*
           44  +	msgcat::mcload [file join $::BWIDGET::LIBRARY "lang"]
           45  +	source [file join $::BWIDGET::LIBRARY "lang" "xopt.tcl"]
           46  +
           47  +}
           48  +
    38     49   
    39     50   #  Add a TraverseIn binding to standard Tk widgets to handle some of
    40     51   #  the BWidget-specific things we do.
    41     52   bind Entry   <<TraverseIn>> { %W selection range 0 end; %W icursor end }
    42     53   bind Spinbox <<TraverseIn>> { %W selection range 0 end; %W icursor end }
    43     54   
    44     55   bind all <Key-Tab>       { Widget::traverseTo [Widget::focusNext %W] }
    45     56   bind all <<PrevWindow>>  { Widget::traverseTo [Widget::focusPrev %W] }
    46     57   
    47     58   
    48     59   ::BWidget::createSystemFonts
    49     60   ::BWidget::set_themedefaults "default"

Added lang/da.msg.

            1  +# ------------------------------------------------------------------------------
            2  +#  da.msg
            3  +#  This file is part of Unifix BWidget Toolkit
            4  +#  Definition of da translation
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +# --- symbolic names of buttons -----------------------------------------------
            8  +
            9  +::msgcat::mcset da {&Abort} {&Annullér}
           10  +::msgcat::mcset da {&Retry} {P&røv igen}
           11  +::msgcat::mcset da {&Ignore} {&Ignorer}
           12  +::msgcat::mcset da {&OK} {&OK}
           13  +::msgcat::mcset da {&Cancel} {&Cancel}
           14  +::msgcat::mcset da {&Yes} {&Ja}
           15  +::msgcat::mcset da {&No} {&Nej}
           16  +
           17  +# --- symbolic names of label of SelectFont dialog ----------------------------
           18  +
           19  +::msgcat::mcset da {Bold} {Fed}
           20  +::msgcat::mcset da {Italic} {Kursiv}
           21  +::msgcat::mcset da {Underline} {Understreg}
           22  +::msgcat::mcset da {Overstrike} {Overstreg}
           23  +::msgcat::mcset da {&Font} {&Font}
           24  +::msgcat::mcset da {&Size} {&Størrelse}
           25  +::msgcat::mcset da {St&yle} {St&il}
           26  +
           27  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           28  +
           29  +::msgcat::mcset da {&Login} {&Brugernavn}
           30  +::msgcat::mcset da {&Password} {&Password}
           31  +
           32  +# --- resource for SelectFont dialog ------------------------------------------
           33  +
           34  +::msgcat::mcset da {Font selection} {Font-valg}
           35  +::msgcat::mcset da {Sample text} {Eksempeltekst æøå}
           36  +
           37  +# --- resource for MessageDlg dialog ------------------------------------------
           38  +
           39  +::msgcat::mcset da {Message} {Besked}
           40  +::msgcat::mcset da {Information} {Information}
           41  +::msgcat::mcset da {Question} {Spørgsmål}
           42  +::msgcat::mcset da {Warning} {Advarsel}
           43  +::msgcat::mcset da {Error} {Fejl}
           44  +
           45  +# --- resource for PasswdDlg dialog -------------------------------------------
           46  +
           47  +::msgcat::mcset da {Enter login and password} {Indtast brugernavn og password}

Added lang/de.msg.

            1  +# ------------------------------------------------------------------------------
            2  +#  de.msg
            3  +#  This file is part of Unifix BWidget Toolkit
            4  +#  Definition of de translation
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +# --- symbolic names of buttons ------------------------------------------------
            8  +
            9  +::msgcat::mcset de {&Abort} {&Abbrechen}
           10  +::msgcat::mcset de {&Retry} {&Wiederholen}
           11  +::msgcat::mcset de {&Ignore} {&Ignorieren}
           12  +::msgcat::mcset de {&OK} {&OK}
           13  +::msgcat::mcset de {&Cancel} {&Abbrechen}
           14  +::msgcat::mcset de {&Yes} {&Ja}
           15  +::msgcat::mcset de {&No} {&Nein}
           16  +
           17  +# --- symbolic names of label of SelectFont dialog ----------------------------
           18  +
           19  +::msgcat::mcset de {Bold} {Fett}
           20  +::msgcat::mcset de {Italic} {Kursiv}
           21  +::msgcat::mcset de {Underline} {Unterstrichen}
           22  +::msgcat::mcset de {Overstrike} {Durchgestrichen}
           23  +::msgcat::mcset de {&Font} {&Schriftart}
           24  +::msgcat::mcset de {&Size} {S&chriftgrad}
           25  +::msgcat::mcset de {St&yle} {Sc&hriftschnitt}
           26  +
           27  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           28  +
           29  +::msgcat::mcset de {&Login} {&Login}
           30  +::msgcat::mcset de {&Password} {&Password}
           31  +
           32  +# --- resource for SelectFont dialog ------------------------------------------
           33  +
           34  +::msgcat::mcset de {Font selection} {Schrift Auswahl}
           35  +::msgcat::mcset de {Sample text} {Beispieltext}
           36  +
           37  +# --- resource for MessageDlg dialog ------------------------------------------
           38  +
           39  +::msgcat::mcset de {Message} {Meldung}
           40  +::msgcat::mcset de {Information} {Hinweis}
           41  +::msgcat::mcset de {Question} {Frage}
           42  +::msgcat::mcset de {Warning} {Warnung}
           43  +::msgcat::mcset de {Error} {Fehler}
           44  +
           45  +# --- resource for PasswdDlg dialog -------------------------------------------
           46  +
           47  +::msgcat::mcset de {Enter login and password} {Enter login and password}

Added lang/en.msg.

            1  +# ------------------------------------------------------------------------------
            2  +#  en.msg
            3  +#  This file is part of Unifix BWidget Toolkit
            4  +#  Definition of en translation
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +# --- symbolic names of buttons ------------------------------------------------
            8  +
            9  +::msgcat::mcset en {&Abort} {&Abort}
           10  +::msgcat::mcset en {&Retry} {&Retry}
           11  +::msgcat::mcset en {&Ignore} {&Ignore}
           12  +::msgcat::mcset en {&OK} {&OK}
           13  +::msgcat::mcset en {&Cancel} {&Cancel}
           14  +::msgcat::mcset en {&Yes} {&Yes}
           15  +::msgcat::mcset en {&No} {&No}
           16  +
           17  +# --- symbolic names of label of SelectFont dialog ----------------------------
           18  +
           19  +::msgcat::mcset en {Bold} {Bold}
           20  +::msgcat::mcset en {Italic} {Italic}
           21  +::msgcat::mcset en {Underline} {Underline}
           22  +::msgcat::mcset en {Overstrike} {Overstrike}
           23  +::msgcat::mcset en {&Font} {&Font}
           24  +::msgcat::mcset en {&Size} {&Size}
           25  +::msgcat::mcset en {St&yle} {St&yle}
           26  +
           27  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           28  +
           29  +::msgcat::mcset en {&Login} {&Login}
           30  +::msgcat::mcset en {&Password} {&Password}
           31  +
           32  +# --- resource for SelectFont dialog ------------------------------------------
           33  +
           34  +::msgcat::mcset en {Font selection} {Font selection}
           35  +::msgcat::mcset en {Sample text} {Sample text}
           36  +
           37  +# --- resource for MessageDlg dialog ------------------------------------------
           38  +
           39  +::msgcat::mcset en {Message} {Message}
           40  +::msgcat::mcset en {Information} {Information}
           41  +::msgcat::mcset en {Question} {Question}
           42  +::msgcat::mcset en {Warning} {Warning}
           43  +::msgcat::mcset en {Error} {Error}
           44  +
           45  +# --- resource for PasswdDlg dialog -------------------------------------------
           46  +
           47  +::msgcat::mcset en {Enter login and password} {Enter login and password}

Added lang/es.msg.

            1  +# ------------------------------------------------------------------------------
            2  +#  es.msg
            3  +#  This file is part of Unifix BWidget Toolkit
            4  +#  Definition of es translation
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +# --- symbolic names of buttons ------------------------------------------------
            8  +
            9  +::msgcat::mcset es {&Abort} {A&bortar}
           10  +::msgcat::mcset es {&Retry} {&Reintentar}
           11  +::msgcat::mcset es {&Ignore} {&Ignorar}
           12  +::msgcat::mcset es {&OK} {&OK}
           13  +::msgcat::mcset es {&Cancel} {&Anular}
           14  +::msgcat::mcset es {&Yes} {&Sí}
           15  +::msgcat::mcset es {&No} {&No}
           16  +
           17  +# --- symbolic names of label of SelectFont dialog ----------------------------
           18  +
           19  +::msgcat::mcset es {Bold} {&Negrita}
           20  +::msgcat::mcset es {Italic} {&Cursiva}
           21  +::msgcat::mcset es {Underline} {&Subrayado}
           22  +::msgcat::mcset es {Overstrike} {&Tachado}
           23  +::msgcat::mcset es {&Font} {&Fuente}
           24  +::msgcat::mcset es {&Size} {&Tamaño}
           25  +::msgcat::mcset es {St&yle} {&Estilo}
           26  +
           27  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           28  +
           29  +::msgcat::mcset es {&Login} {Nombre de &usuario}
           30  +::msgcat::mcset es {&Password} {&Contraseña}
           31  +
           32  +# --- resource for SelectFont dialog ------------------------------------------
           33  +
           34  +::msgcat::mcset es {Font selection} {Selección de fuente}
           35  +::msgcat::mcset es {Sample text} {Texto de Ejemplo}
           36  +
           37  +# --- resource for MessageDlg dialog ------------------------------------------
           38  +
           39  +::msgcat::mcset es {Message} {Indicación}
           40  +::msgcat::mcset es {Information} {Información}
           41  +::msgcat::mcset es {Question} {Pregunta}
           42  +::msgcat::mcset es {Warning} {Atención}
           43  +::msgcat::mcset es {Error} {Error}
           44  +
           45  +# --- resource for PasswdDlg dialog -------------------------------------------
           46  +
           47  +::msgcat::mcset es {Enter login and password} {Introduzca su nombre de usuario y contraseña}

Added lang/fr.msg.

            1  +# ------------------------------------------------------------------------------
            2  +#  fr.msg
            3  +#  This file is part of Unifix BWidget Toolkit
            4  +#  Definition of fr translation
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +# --- symbolic names of buttons ------------------------------------------------
            8  +
            9  +::msgcat::mcset fr {&Abort} {A&bandonner}
           10  +::msgcat::mcset fr {&Retry} {&Réessayer}
           11  +::msgcat::mcset fr {&Ignore} {&Ignorer}
           12  +::msgcat::mcset fr {&OK} {&OK}
           13  +::msgcat::mcset fr {&Cancel} {&Annuler}
           14  +::msgcat::mcset fr {&Yes} {&Oui}
           15  +::msgcat::mcset fr {&No} {&Non}
           16  +
           17  +# --- symbolic names of label of SelectFont dialog ----------------------------
           18  +
           19  +::msgcat::mcset fr {Bold} {&Gras}
           20  +::msgcat::mcset fr {Italic} {&Italique}
           21  +::msgcat::mcset fr {Underline} {&Souligné}
           22  +::msgcat::mcset fr {Overstrike} {&Barré}
           23  +::msgcat::mcset fr {&Font} {&Police}
           24  +::msgcat::mcset fr {&Size} {&Taille}
           25  +::msgcat::mcset fr {St&yle} {St&yle}
           26  +
           27  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           28  +
           29  +::msgcat::mcset fr {&Login} {Nom de l'&utilisateur}
           30  +::msgcat::mcset fr {&Password} {Mot de &passe}
           31  +
           32  +# --- resource for SelectFont dialog ------------------------------------------
           33  +
           34  +::msgcat::mcset fr {Font selection} {Sélection d'une police}
           35  +::msgcat::mcset fr {Sample text} {Texte d'exemple}
           36  +
           37  +# --- resource for MessageDlg dialog ------------------------------------------
           38  +
           39  +::msgcat::mcset fr {Message} {Message}
           40  +::msgcat::mcset fr {Information} {Information}
           41  +::msgcat::mcset fr {Question} {Question}
           42  +::msgcat::mcset fr {Warning} {Attention}
           43  +::msgcat::mcset fr {Error} {Erreur}
           44  +
           45  +# --- resource for PasswdDlg dialog -------------------------------------------
           46  +
           47  +::msgcat::mcset fr {Enter login and password} {Entrez le login et le mot de passe}

Added lang/hu.msg.

            1  +# ------------------------------------------------------------------------------
            2  +#  hu.msg
            3  +#  This file is part of Unifix BWidget Toolkit
            4  +#  Definition of hu translation
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +# --- symbolic names of buttons ------------------------------------------------
            8  +
            9  +::msgcat::mcset hu {&Abort} {&Megszakítás}
           10  +::msgcat::mcset hu {&Retry} {Új&ra}
           11  +::msgcat::mcset hu {&Ignore} {&Kihagyás}
           12  +::msgcat::mcset hu {&OK} {&OK}
           13  +::msgcat::mcset hu {&Cancel} {Még&sem}
           14  +::msgcat::mcset hu {&Yes} {&Igen}
           15  +::msgcat::mcset hu {&No} {&Nem}
           16  +
           17  +# --- symbolic names of label of SelectFont dialog ----------------------------
           18  +
           19  +::msgcat::mcset hu {Bold} {Félkövér}
           20  +::msgcat::mcset hu {Italic} {Dőlt}
           21  +::msgcat::mcset hu {Underline} {Aláhúzott}
           22  +::msgcat::mcset hu {Overstrike} {Felülírás}
           23  +::msgcat::mcset hu {&Font} {&Betűtípus}
           24  +::msgcat::mcset hu {&Size} {&Méret}
           25  +::msgcat::mcset hu {St&yle} {S&tílus}
           26  +
           27  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           28  +
           29  +::msgcat::mcset hu {&Login} {&Felhasználónév}
           30  +::msgcat::mcset hu {&Password} {&Jelszó}
           31  +
           32  +# --- resource for SelectFont dialog ------------------------------------------
           33  +
           34  +::msgcat::mcset hu {Font selection} {Betűtípus kiválasztása}
           35  +::msgcat::mcset hu {Sample text} {Példaszöveg}
           36  +
           37  +# --- resource for MessageDlg dialog ------------------------------------------
           38  +
           39  +::msgcat::mcset hu {Message} {Üzenet}
           40  +::msgcat::mcset hu {Information} {Információ}
           41  +::msgcat::mcset hu {Question} {Kérdés}
           42  +::msgcat::mcset hu {Warning} {Figyelmeztetés}
           43  +::msgcat::mcset hu {Error} {Hiba}
           44  +
           45  +# --- resource for PasswdDlg dialog -------------------------------------------
           46  +
           47  +::msgcat::mcset hu {Enter login and password} {Add meg a felhasználónevet és a jelszót}

Added lang/nl.msg.

            1  +# ------------------------------------------------------------------------------
            2  +#  nl.msg
            3  +#  This file is part of Unifix BWidget Toolkit
            4  +#  Definition of nl translation
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +# --- symbolic names of buttons ------------------------------------------------
            8  +
            9  +::msgcat::mcset nl {&Abort} {Af&breken}
           10  +::msgcat::mcset nl {&Retry} {Opnie&uw proberen}
           11  +::msgcat::mcset nl {&Ignore} {N&egeren}
           12  +::msgcat::mcset nl {&OK} {&OK}
           13  +::msgcat::mcset nl {&Cancel} {&Annuleren}
           14  +::msgcat::mcset nl {&Yes} {&Ja}
           15  +::msgcat::mcset nl {&No} {&Nee}
           16  +
           17  +# --- symbolic names of label of SelectFont dialog ----------------------------
           18  +
           19  +::msgcat::mcset nl {Bold} {Vet}
           20  +::msgcat::mcset nl {Italic} {Cursief}
           21  +::msgcat::mcset nl {Underline} {Onderstrepen}
           22  +::msgcat::mcset nl {Overstrike} {Doorhalen}
           23  +::msgcat::mcset nl {&Font} {&Lettertype}
           24  +::msgcat::mcset nl {&Size} {&Grootte}
           25  +::msgcat::mcset nl {St&yle} {&Stijl}
           26  +
           27  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           28  +
           29  +::msgcat::mcset nl {&Login} {&Inlognaam}
           30  +::msgcat::mcset nl {&Password} {&Wachtwoord}
           31  +
           32  +# --- resource for SelectFont dialog ------------------------------------------
           33  +
           34  +::msgcat::mcset nl {Font selection} {Lettertypeselectie}
           35  +::msgcat::mcset nl {Sample text} {Voorbeeldtekst}
           36  +
           37  +# --- resource for MessageDlg dialog ------------------------------------------
           38  +
           39  +::msgcat::mcset nl {Message} {Bericht}
           40  +::msgcat::mcset nl {Information} {Informatie}
           41  +::msgcat::mcset nl {Question} {Vraag}
           42  +::msgcat::mcset nl {Warning} {Waarschuwing}
           43  +::msgcat::mcset nl {Error} {Fout}
           44  +
           45  +# --- resource for PasswdDlg dialog -------------------------------------------
           46  +
           47  +::msgcat::mcset nl {Enter login and password} {Voer inlognaam en wachtwoord in}

Added lang/no.msg.

            1  +# ------------------------------------------------------------------------------
            2  +#  no.msg
            3  +#  This file is part of Unifix BWidget Toolkit
            4  +#  Definition of no translation
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +# --- symbolic names of buttons ------------------------------------------------
            8  +
            9  +::msgcat::mcset no {&Abort} {&Om}
           10  +::msgcat::mcset no {&Retry} {&Prøv igjen}
           11  +::msgcat::mcset no {&Ignore} {&Ignore}
           12  +::msgcat::mcset no {&OK} {&OK}
           13  +::msgcat::mcset no {&Cancel} {&Avbryt}
           14  +::msgcat::mcset no {&Yes} {&Ja}
           15  +::msgcat::mcset no {&No} {&Nei}
           16  +
           17  +# --- symbolic names of label of SelectFont dialog ----------------------------
           18  +
           19  +::msgcat::mcset no {Bold} {Halvfet}
           20  +::msgcat::mcset no {Italic} {Kursiv}
           21  +::msgcat::mcset no {Underline} {Understreking}
           22  +::msgcat::mcset no {Overstrike} {Overstryke}
           23  +::msgcat::mcset no {&Font} {&Skrift}
           24  +::msgcat::mcset no {&Size} {&Størrelse}
           25  +::msgcat::mcset no {St&yle} {St&il}
           26  +
           27  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           28  +
           29  +::msgcat::mcset no {&Login} {&Logg inn}
           30  +::msgcat::mcset no {&Password} {&Passord}
           31  +
           32  +# --- resource for SelectFont dialog ------------------------------------------
           33  +
           34  +::msgcat::mcset no {Font selection} {Skriftvalg}
           35  +::msgcat::mcset no {Sample text} {Prøve tekst}
           36  +
           37  +# --- resource for MessageDlg dialog ------------------------------------------
           38  +
           39  +::msgcat::mcset no {Message} {Melding}
           40  +::msgcat::mcset no {Information} {Informasjon}
           41  +::msgcat::mcset no {Question} {Spørsmål}
           42  +::msgcat::mcset no {Warning} {Advarsel}
           43  +::msgcat::mcset no {Error} {Feil}
           44  +
           45  +# --- resource for PasswdDlg dialog -------------------------------------------
           46  +
           47  +::msgcat::mcset no {Enter login and password} {Skriv inn logginn og passord}

Added lang/pl.msg.

            1  +# ------------------------------------------------------------------------------
            2  +#  pl.msg
            3  +#  This file is part of Unifix BWidget Toolkit
            4  +#  Definition of pl translation
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +# --- symbolic names of buttons ------------------------------------------------
            8  +
            9  +::msgcat::mcset pl {&Abort} {&Porzuć}
           10  +::msgcat::mcset pl {&Retry} {P&onów}
           11  +::msgcat::mcset pl {&Ignore} {&Ignoruj}
           12  +::msgcat::mcset pl {&OK} {&OK}
           13  +::msgcat::mcset pl {&Cancel} {&Anyluj}
           14  +::msgcat::mcset pl {&Yes} {&Tak}
           15  +::msgcat::mcset pl {&No} {&Nie}
           16  +
           17  +# --- symbolic names of label of SelectFont dialog ----------------------------
           18  +
           19  +::msgcat::mcset pl {Bold} {Pogrubiona}
           20  +::msgcat::mcset pl {Italic} {Kursywa}
           21  +::msgcat::mcset pl {Underline} {Podkreślenie}
           22  +::msgcat::mcset pl {Overstrike} {Przekreślenie}
           23  +::msgcat::mcset pl {&Font} {&Czcionka:}
           24  +::msgcat::mcset pl {&Size} {&Rozmiar:}
           25  +::msgcat::mcset pl {St&yle} {St&yl czcionki:}
           26  +
           27  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           28  +
           29  +::msgcat::mcset pl {&Login} {&Login}
           30  +::msgcat::mcset pl {&Password} {&Hasło}
           31  +
           32  +# --- resource for SelectFont dialog ------------------------------------------
           33  +
           34  +::msgcat::mcset pl {Font selection} {Wybór czcionki}
           35  +::msgcat::mcset pl {Sample text} {Przykładowy tekst}
           36  +
           37  +# --- resource for MessageDlg dialog ------------------------------------------
           38  +
           39  +::msgcat::mcset pl {Message} {Wiadomość}
           40  +::msgcat::mcset pl {Information} {Informacja}
           41  +::msgcat::mcset pl {Question} {Pytanie}
           42  +::msgcat::mcset pl {Warning} {Ostrzeżenie}
           43  +::msgcat::mcset pl {Error} {Błąd}
           44  +
           45  +# --- resource for PasswdDlg dialog -------------------------------------------
           46  +
           47  +::msgcat::mcset pl {Enter login and password} {Wpisz login i hasło}

Added lang/xopt.tcl.

            1  +# ------------------------------------------------------------------------------
            2  +# xopt.tcl
            3  +# This file is part of Unifix BWidget Toolkit
            4  +# Definition of resources
            5  +# ------------------------------------------------------------------------------
            6  +
            7  +
            8  +# --- symbolic names of buttons ------------------------------------------------
            9  +
           10  +option add *abortName [::msgcat::mc {&Abort}]
           11  +option add *retryName [::msgcat::mc {&Retry}]
           12  +option add *ignoreName [::msgcat::mc {&Ignore}]
           13  +option add *okName [::msgcat::mc {&OK}]
           14  +option add *cancelName [::msgcat::mc {&Cancel}]
           15  +option add *yesName [::msgcat::mc {&Yes}]
           16  +option add *noName [::msgcat::mc {&No}]
           17  +
           18  +
           19  +# --- symbolic names of label of SelectFont dialog ----------------------------
           20  +
           21  +option add *boldName [::msgcat::mc {Bold}]
           22  +option add *italicName [::msgcat::mc {Italic}]
           23  +option add *underlineName [::msgcat::mc {Underline}]
           24  +option add *overstrikeName [::msgcat::mc {Overstrike}]
           25  +option add *fontName [::msgcat::mc {&Font}]
           26  +option add *sizeName [::msgcat::mc {&Size}]
           27  +option add *styleName [::msgcat::mc {St&yle}]
           28  +
           29  +
           30  +# --- symbolic names of label of PasswdDlg dialog -----------------------------
           31  +
           32  +option add *loginName [::msgcat::mc {&Login}]
           33  +option add *passwordName [::msgcat::mc {&Password}]
           34  +
           35  +
           36  +# --- resource for SelectFont dialog ------------------------------------------
           37  +
           38  +option add *SelectFont.title [::msgcat::mc {Font selection}]
           39  +option add *SelectFont.sampletext [::msgcat::mc {Sample text}]
           40  +
           41  +
           42  +# --- resource for MessageDlg dialog ------------------------------------------
           43  +
           44  +option add *MessageDlg.noneTitle [::msgcat::mc {Message}]
           45  +option add *MessageDlg.infoTitle [::msgcat::mc {Information}]
           46  +option add *MessageDlg.questionTitle [::msgcat::mc {Question}]
           47  +option add *MessageDlg.warningTitle [::msgcat::mc {Warning}]
           48  +option add *MessageDlg.errorTitle [::msgcat::mc {Error}]
           49  +
           50  +# --- resource for PasswdDlg dialog -------------------------------------------
           51  +
           52  +option add *PasswdDlg.title [::msgcat::mc {Enter login and password}]

Changes to utils.tcl.

   800    800   	          font configure $fname -size $fp(tooltipsize)
   801    801   	      }	      
   802    802   	    }
   803    803           }
   804    804       }
   805    805   }
   806    806   
          807  +
          808  +# ----------------------------------------------------------------------------
          809  +# utility function for language (locale) support
          810  +# ----------------------------------------------------------------------------
          811  +
          812  +proc BWidget::changeLang { lang } {
          813  +
          814  +	if {[catch {package present Tk}]} {
          815  +		option read [file join $::BWIDGET::LIBRARY "lang" $lang.rc]
          816  +	} else {
          817  +		::msgcat::mclocale $lang
          818  +		source [file join $::BWIDGET::LIBRARY "lang" "xopt.tcl"]
          819  +	}
          820  +
          821  +}