WIP where-vessels tuning

[ypp-sc-tools.main.git] / yarrg / where-vessels

diff --git a/yarrg/where-vessels b/yarrg/where-vessels
index a7afc1eab7cccc1d1fdd5b9fd3d22335732b75b7..0b32a48eaa2e6e1f70f0c87eff35cfd129570ef5 100755 (executable)
--- a/yarrg/where-vessels
+++ b/yarrg/where-vessels
@@ -197,9 +197,9 @@ frame .ctrl
 pack .ctrl -side right
 
 panner::canvas-scroll-bbox .f.c
-panner::create .ctrl.pan .f.c 200 200
+panner::create .ctrl.pan .f.c 120 120
 
-pack .ctrl.pan -side top -pady 20 -padx 20
+pack .ctrl.pan -side top -pady 10 -padx 5
 frame .ctrl.zoom
 pack .ctrl.zoom -side top