chiark
/
gitweb
/
~yarrgweb
/
ypp-sc-tools.web-live.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
dictionary-manager approval minor fixes
[ypp-sc-tools.web-live.git]
/
pctb
/
dictionary-manager
diff --git
a/pctb/dictionary-manager
b/pctb/dictionary-manager
index 26c880750b3ce23a4e60494f2a797e1ee107a5c1..a2a82a442de973eff2497b8885c6525145911228 100755
(executable)
--- 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
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
}
lappend approve_ixes $ix
}
@@
-982,7
+982,7
@@
proc approve_show_page {delta} {
eval destroy [winfo children .app]
set approve_ixes {}
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]
incr approve_page $delta
set ll [llength $approve_list]