← Back to branch summary

~ubuntu-branches/ubuntu/precise/grass/precise

« back to all changes in this revision

Viewing changes to visualization/nviz/scripts/multimapBrowser.tcl

  • Committer: Bazaar Package Importer
  • Author(s): Francesco Paolo Lovergine
  • Date: 2011-04-13 17:08:41 UTC
  • mfrom: (8.1.7 sid)
  • Revision ID: james.westby@ubuntu.com-20110413170841-ss1t9bic0d0uq0gz
Tags: 6.4.1-1
* New upstream version.
* Now build-dep on libjpeg-dev and current libreadline6-dev.
* Removed patch swig: obsolete.
* Policy bumped to 3.9.2, without changes.

Show diffs side-by-side

added added

removed removed

Lines of Context:
visualization/nviz/scripts/multimapBrowser.tcl
96
96
    scrollbar $w.list.l.scroll \
97
97
        -command "$w.list.l.list yview"
98
98
 
99
 
    button $w.list.remove -text "Remove"  -bd 1 \
 
99
    button $w.list.remove -text [G_msg "Remove"]  -bd 1 \
100
100
                -command "multimap_remove_cmd $w"
101
101
    pack $w.list.l.list $w.list.l.scroll -side left -fill y -expand yes
102
102
    pack $w.list.l $w.list.remove -side top -fill x -expand yes
103
103
    
104
104
    frame     $w.main.mapsets
105
 
    label     $w.main.mapsets.label -text MAPSETS
 
105
    label     $w.main.mapsets.label -text [G_msg "MAPSETS"]
106
106
    frame     $w.main.mapsets.f
107
107
    listbox   $w.main.mapsets.f.list -bd 2 -relief sunken \
108
108
        -exportselection no                     \
116
116
        "multimap_browser_select_mapset  %W %y $w"
117
117
    
118
118
    frame     $w.main.files
119
 
    label     $w.main.files.label -text FILES
 
119
    label     $w.main.files.label -text [G_msg "FILES"]
120
120
    frame     $w.main.files.f
121
121
    listbox   $w.main.files.f.list -bd 2 -relief sunken \
122
122
        -exportselection no                   \
146
146
    }
147
147
    
148
148
    if [string compare $type all] {
149
 
        label $w.element.menu -text "Map Type:" -relief flat
 
149
        label $w.element.menu -text [G_msg "Map Type:"] -relief flat
150
150
    } else {
151
151
        set name ""
152
 
        menubutton $w.element.menu -text {Map Type} -menu $w.element.menu.m -relief raised -bd 1
 
152
        menubutton $w.element.menu -text [G_msg "Map Type"] -menu $w.element.menu.m -relief raised -bd 1
153
153
        menu $w.element.menu.m
154
154
        $w.element.menu.m add command \
155
 
            -label {Raster} -command "set_multimap_browser_element  $w Raster"
156
 
        $w.element.menu.m add command \
157
 
            -label {Vector} -command "set_multimap_browser_element  $w Vector"
158
 
        $w.element.menu.m add command \
159
 
            -label {Site} -command "set_multimap_browser_element  $w Site"
160
 
        $w.element.menu.m add command \
161
 
            -label {Surf} -command "set_multimap_browser_element $w Surf"
162
 
        $w.element.menu.m add command \
163
 
            -label {Regions} -command "set_multimap_browser_element  $w windows"
164
 
        $w.element.menu.m add command \
165
 
            -label {Labels} -command "set_multimap_browser_element  $w\
 
155
            -label [G_msg "Raster"] -command "set_multimap_browser_element  $w Raster"
 
156
        $w.element.menu.m add command \
 
157
            -label [G_msg "Vector"] -command "set_multimap_browser_element  $w Vector"
 
158
        $w.element.menu.m add command \
 
159
            -label [G_msg "Site"] -command "set_multimap_browser_element  $w Site"
 
160
        $w.element.menu.m add command \
 
161
            -label [G_msg "Surf"] -command "set_multimap_browser_element $w Surf"
 
162
        $w.element.menu.m add command \
 
163
            -label [G_msg "Regions"] -command "set_multimap_browser_element  $w windows"
 
164
        $w.element.menu.m add command \
 
165
            -label [G_msg "Labels"] -command "set_multimap_browser_element  $w\
166
166
                    paint/labels"
167
167
            $w.element.menu.m add command \
168
 
            -label {Icons} -command "set_multimap_browser_element  $w icons"
 
168
            -label [G_msg "Icons"] -command "set_multimap_browser_element  $w icons"
169
169
    }
170
170
 
171
 
    button $w.done -text Done -command "multimap_done_cmd $w" -bd 1
172
 
    button $w.cancel -text Cancel -command "multimap_cancel_cmd $w" -bd 1
 
171
    button $w.done -text [G_msg "Done"] -command "multimap_done_cmd $w" -bd 1
 
172
    button $w.cancel -text [G_msg "Cancel"] -command "multimap_cancel_cmd $w" -bd 1
173
173
    
174
174
    pack $w.filename -side top -expand yes -fill x
175
175
    pack $w.main -side top
197
197
    }
198
198
    set_multimap_browser_element $w $name
199
199
    set_multimap_browser_mapset $w {}
200
 
    wm title $w "Map Browser"
 
200
    wm title $w [G_msg "Map Browser"]
201
201
    wm protocol $w WM_DELETE_WINDOW "destroy $w"
202
202
 
203
203