File: panzoom.tcl

package info (click to toggle)
xcircuit 3.9.73%2Bdfsg.1-2
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 8,560 kB
  • sloc: ansic: 80,417; sh: 7,295; tcl: 5,891; python: 449; makefile: 300
file content (6 lines) | stat: -rw-r--r-- 237 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
# panzoom.tcl --- rebinds keys Z and z for a zoom style in which
#		  the page is centered on the cursor position
#		  (provded by Ed Casas, 9/4/03)

xcircuit::keybind Z { pan here ; zoom in }
xcircuit::keybind z { pan here ; zoom out }