Remove debug stuff

db4
Slava Pestov 2009-04-03 19:35:22 -05:00
parent 84e98d8be7
commit 695b97e6e6
1 changed files with 1 additions and 1 deletions

View File

@ -261,7 +261,7 @@ M: table model-changed
row-rect [ { 0 1 } v* ] change-dim ;
: (select-row) ( table n -- )
[ dup [ [ thin-row-rect dup unparse show ] [ drop ] 2bi scroll>rect ] [ 2drop ] if ]
[ dup [ [ thin-row-rect ] [ drop ] 2bi scroll>rect ] [ 2drop ] if ]
[ >>selected-index relayout-1 ]
2bi ;