Function: bubbles--show-scores

bubbles--show-scores is a byte-compiled function defined in bubbles.el.gz.

Signature

(bubbles--show-scores)

Documentation

Display current scores.

Source Code

;; Defined in /usr/src/emacs/lisp/play/bubbles.el.gz
(defun bubbles--show-scores ()
  "Display current scores."
  (save-excursion
    (goto-char (or (next-single-property-change (point-min) 'status)
                   (point-max)))
    (let ((inhibit-read-only t)
          (pos (point)))
      (delete-region (point) (point-max))
      (insert (format "Selected: %4d\n" bubbles--neighborhood-score))
      (insert " ")
      (put-text-property (1- (point)) (point)
                         'display
                         (cons 'space (list :width (list bubbles--col-offset))))
      (insert (format "Score:    %4d" bubbles--score))
      (put-text-property pos (point) 'status t))))