← Back to branch summary

~ubuntu-branches/ubuntu/vivid/grass/vivid-proposed

« back to all changes in this revision

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

  • Committer: Package Import Robot
  • Author(s): Bas Couwenberg
  • Date: 2015-02-20 23:12:08 UTC
  • mfrom: (8.2.6 experimental)
  • Revision ID: package-import@ubuntu.com-20150220231208-1u6qvqm84v430b10
Tags: 7.0.0-1~exp1
* New upstream release.
* Update python-ctypes-ternary.patch to use if/else instead of and/or.
* Drop check4dev patch, rely on upstream check.
* Add build dependency on libpq-dev to grass-dev for libpq-fe.h.
* Drop patches applied upstream, refresh remaining patches.
* Update symlinks for images switched from jpg to png.

Show diffs side-by-side

added added

removed removed

Lines of Context:
visualization/nviz/scripts/position_procs.tcl
1
 
proc look_here {W x y} {
2
 
    global Nv_ WhatsHere
3
 
 
4
 
    set WhatsHere(on) 0
5
 
    set y [expr $Nv_(height) - $y]
6
 
    Nlook_here $x $y
7
 
    inform  "New center of view has been set"
8
 
    Nquick_draw
9
 
    bind $W <Button> {}
10
 
}
11
 
 
12
 
proc look_center {{M 0}} {
13
 
 
14
 
    if {$M == 0} { set M [Nget_current surf]}
15
 
    Nset_focus_map surf $M
16
 
    inform  "New center of view has been set"
17
 
    Nquick_draw
18
 
}
19
 
 
20
 
proc no_focus {} {
21
 
    Nset_focus_state 0
22
 
}