Function: quail-prev-translation-block
quail-prev-translation-block is an interactive and byte-compiled
function defined in quail.el.gz.
Signature
(quail-prev-translation-block)
Documentation
Select the previous batch of 10 translation candidates.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/international/quail.el.gz
(defun quail-prev-translation-block ()
"Select the previous batch of 10 translation candidates."
(interactive)
(if quail-current-translations
(let* ((indices (car quail-current-translations))
(offset (- (car indices) (nth 1 indices))))
(if (= (nth 1 indices) 0)
;; We are already at the first block.
(beep)
(setcar indices (1- (nth 1 indices)))
(quail-update-current-translations)
(if (< (+ (nth 1 indices) offset) (nth 2 indices))
(progn
(setcar indices (+ (nth 1 indices) offset))
(quail-update-current-translations)))
(quail-update-translation nil)))
(quail-add-unread-command-events last-command-event)
(quail-terminate-translation)))