Changeset 6621

Timestamp:

May 28, 2007, 12:45:41 AM (18 years ago)

Author:

Gary Byers

Message:

Invert defaults for listener input/output styles (output is now bold,
input regular by default.)

File:

• branches/ide-1.0/ccl/examples/cocoa-listener.lisp (modified) (1 diff)

branches/ide-1.0/ccl/examples/cocoa-listener.lisp

@@ -10 +10 @@
 (def-cocoa-default *listener-columns* :int 80 "Initial height of listener windows, in characters")
 
-(def-cocoa-default hi::*listener-output-style* :int 0 "Text style index for listener output")
-
-(def-cocoa-default hi::*listener-input-style* :int 1 "Text style index for listener output")
+(def-cocoa-default hi::*listener-output-style* :int 1 "Text style index for listener output")
+
+(def-cocoa-default hi::*listener-input-style* :int 0 "Text style index for listener output")
 
 (def-cocoa-default *listener-background-red-component* :float 0.90f0 "Red component of editor background color.  Should be a float between 0.0 and 1.0, inclusive.")