ui.tools.browser: use unicode next/prev arrows.
parent
c03a7b5ec2
commit
6aa7d52473
|
@ -38,7 +38,7 @@ CONSTANT: prev -1
|
||||||
CONSTANT: next 1
|
CONSTANT: next 1
|
||||||
|
|
||||||
: add-navigation-arrow ( str direction -- str )
|
: add-navigation-arrow ( str direction -- str )
|
||||||
prev = [ "<" prefix ] [ ">" suffix ] if ;
|
prev = [ "←" prefix ] [ "→" suffix ] if ;
|
||||||
|
|
||||||
: $navigation-arrow ( content element direction -- )
|
: $navigation-arrow ( content element direction -- )
|
||||||
[ prefix 1array ] dip add-navigation-arrow , ;
|
[ prefix 1array ] dip add-navigation-arrow , ;
|
||||||
|
|
Loading…
Reference in New Issue