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

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

(setq tn-enable-linum t)
(linum-mode tn-enable-linum)

(defun current-line ()
    (interactive)
