 (eval-when-compile (require 'cl))
 (require 'json)
+(require 'linum)
 
 (require 'goto-addr)
 

(setq tn-atoms nil)
(setq tn-current-line 1)
(setq tn-mode nil)  ;; Note: 'view-mode' is used by Emacs.

(defun current-line ()
    (interactive)

                    ;; This is not always possible and not always helpful, but it is often both.
                    (beginning-of-line tn-current-line)
                    (setq buffer-read-only (not editable))
                    (linum-mode tn-enable-linum)
                    (info-message (concat "updated to view " (view-info)))))))

(defun receive-export-results (status)
