Function: artist-compute-up-event-key

artist-compute-up-event-key is a byte-compiled function defined in artist.el.gz.

Signature

(artist-compute-up-event-key EV)

Documentation

Compute the corresponding up key sequence for event EV.

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/artist.el.gz
(defun artist-compute-up-event-key (ev)
  "Compute the corresponding up key sequence for event EV."
 (let* ((basic (event-basic-type ev))
	(unshifted basic)
	(shifted (make-symbol (concat "S-" (symbol-name basic)))))
   (if (artist-event-is-shifted ev)
       (make-vector 1 shifted)
     (make-vector 1 unshifted))))