Commit f38d7ed4 authored by ram's avatar ram
Browse files

This commit was generated by cvs2svn to compensate for changes in r5497,

which included commits to RCS files with non-trunk default branches.
parents 3dc8093e 0cbb2b7a
......@@ -7,7 +7,7 @@
;;; Scott Fahlman or
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/hemlock/key-event.lisp,v 1992/05/22 18:42:38 ram Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/hemlock/key-event.lisp,v 1992/09/07 16:50:35 ram Exp $")
;;; **********************************************************************
......@@ -647,7 +647,7 @@
(defmacro do-alpha-key-events ((var kind &optional result) &rest forms)
"(DO-ALPHA-CHARS (var kind [result]) {form}*)
"(DO-ALPHA-KEY-EVENTS (var kind [result]) {form}*)
This macro evaluates each form with var bound to a key-event representing an
alphabetic character. Kind is one of :lower, :upper, or :both, and this
binds var to each key-event in order as specified in the X11 protocol
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment