X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-test.git;a=blobdiff_plain;f=pctb%2Fdictionary-manager;h=a2a82a442de973eff2497b8885c6525145911228;hp=26c880750b3ce23a4e60494f2a797e1ee107a5c1;hb=9739f45fc783a87f02d1f435cf04fde3899ad4c7;hpb=0c7799d7cea28bfc9d24ea4a152b5fa602118284

diff --git a/pctb/dictionary-manager b/pctb/dictionary-manager
index 26c8807..a2a82a4 100755
--- a/pctb/dictionary-manager
+++ b/pctb/dictionary-manager
@@ -882,7 +882,7 @@ proc approve_showentry {ix file specdata} {
     pack $wb-act.rej
 
     grid $wb-def $wb-image $wb-act $wb-inf -padx 3
-    grid configure $wb-image -ipadx 3 -ipady 3
+    grid configure $wb-image -ipadx 3 -ipady 3 -sticky w
 
     lappend approve_ixes $ix
 }
@@ -982,7 +982,7 @@ proc approve_show_page {delta} {
     eval destroy [winfo children .app]
     set approve_ixes {}
 
-    set per_page 2
+    set per_page 10
     incr approve_page $delta
 
     set ll [llength $approve_list]