Function: type-break-get-previous-count

type-break-get-previous-count is a byte-compiled function defined in type-break.el.gz.

Signature

(type-break-get-previous-count)

Documentation

Get previous keystroke count from type-break-file-name.

Return 0 if the file is missing or if the form read is not an integer.

Source Code

;; Defined in /usr/src/emacs/lisp/type-break.el.gz
(defun type-break-get-previous-count ()
  "Get previous keystroke count from `type-break-file-name'.
Return 0 if the file is missing or if the form read is not an
integer."
  (let ((file (type-break-choose-file)))
    (if (and file
             (integerp
              (setq file
                    (with-current-buffer
                        (find-file-noselect file 'nowarn)
                    (condition-case nil
                        (save-excursion
                          (goto-char (point-min))
                          (forward-line 1)
                          (read (current-buffer)))
                      (end-of-file
                       (warn "End of file in `%s'" file)))))))
        file
      0)))