summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <matthias@benkard.de>2008-08-28 13:59:11 +0200
committerMatthias Andreas Benkard <matthias@benkard.de>2008-08-28 13:59:11 +0200
commitb2b6a790d8f6b1002973ef522a928a2047be511d (patch)
treea7fa50693fed096ae1ba57444e66f755443800c6
parent93a1b1d7ff1e2e54796f15b544de2217174b0de5 (diff)
Listener: Select the input field after clearing it.
-rw-r--r--MLKListenerController.m3
1 files changed, 2 insertions, 1 deletions
diff --git a/MLKListenerController.m b/MLKListenerController.m
index 88a58d6..4e238a7 100644
--- a/MLKListenerController.m
+++ b/MLKListenerController.m
@@ -49,6 +49,7 @@
NS_ENDHANDLER;
[inputField setStringValue:@""];
+ [inputField selectText:self];
package = [[MLKDynamicContext currentContext]
valueForSymbol:[[MLKPackage findPackage:@"COMMON-LISP"]
@@ -97,7 +98,7 @@
[[text mutableString] appendString:@"\n"];
[text endEditing];
-
+
[submitButton setEnabled:YES];
}
@end