aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--desiredata/src/desire.tk2
1 files changed, 1 insertions, 1 deletions
diff --git a/desiredata/src/desire.tk b/desiredata/src/desire.tk
index 967abdd5..ffadd2bf 100644
--- a/desiredata/src/desire.tk
+++ b/desiredata/src/desire.tk
@@ -7058,7 +7058,7 @@ def ClassBrowser init {name x y textbox} {
def ClassBrowser fill_box {s} {
global class_list
$@listbox delete 0 end
- foreach class $class_list {
+ foreach class [lsort $class_list] {
if {[string length $s]==0 || [string first $s $class]>=0} {
set t "\[$class\]"
if {[can_say $class]} {append t " [say $class]"}