Stacke effect fix

release
Slava Pestov 2007-12-06 00:06:43 -05:00
parent 6120f5f387
commit 54b52e7b01
1 changed files with 1 additions and 1 deletions

View File

@ -26,7 +26,7 @@ TAGS>
"extra/xmode/modes/catalog" resource-path
<file-reader> read-xml parse-modes-tag ;
: modes ( -- )
: modes ( -- assoc )
\ modes get-global [
load-catalog dup \ modes set-global
] unless* ;