UI work

diff --git a/TODO.FACTOR.txt b/TODO.FACTOR.txt
index 0e4503ea59c0bca0aa1ec8fd57ff87ae6bb36057..d615ba1e1983bf7dce22e463d7e33767fdb2c93a 100644 (file)
--- a/TODO.FACTOR.txt
+++ b/TODO.FACTOR.txt
@@ -7,8 +7,8 @@
 - [ ... is annoying\r
   perhaps on the last line of output, if a block doesn't fit, print\r
   it anyway?\r
-- apropos: use new smarter completion?\r
-- fix buttons\r
+- fix first/last arrows\r
+- deallocate textures and display lists\r
 \r
 + ui:\r
 \r

diff --git a/factor/ExternalFactor.java b/factor/ExternalFactor.java
index 9a561cbb62001ea698fa311176e8fe0003861828..a7f155ef220aea900cf84196cd8f212d10316adc 100644 (file)
--- a/factor/ExternalFactor.java
+++ b/factor/ExternalFactor.java
@@ -255,10 +255,10 @@ public class ExternalFactor extends VocabularyLookup
                switch(mode)
                {
                case COMPLETE_START:
-                       predicate = "[ word-name swap head? ]";
+                       predicate = "[ word-name [ swap head? ] completion? ]";
                        break;
                case COMPLETE_ANYWHERE:
-                       predicate = "[ word-name subseq? ]";
+                       predicate = "[ word-name [ subseq? ] completion? ]";
                        break;
                case COMPLETE_EQUAL:
                        predicate = "[ word-name = ]";