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

(global-set-key (kbd "C-c C-w C-] d")   'tn-set-max-weight-3)
(global-set-key (kbd "C-c C-w C-] f")   'tn-set-max-weight-4)


;; Note: these should perhaps be local settings
(global-set-key (kbd "C-c C-v ;") 'toggle-truncate-lines)
(setq-default truncate-lines t)
(if full-colors-supported
    (let ()

                    ;; 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)
