                 (style (cdr (assoc 'style json)))
                 (title (cdr (assoc 'title json))))
                     (switch-to-buffer (view-name root))
-                    ;;(tinkernotes-mode)
-                    (erase-buffer)
-                    (let ((view-json (json-read-from-string view)))
-                        (write-view (cdr (assoc 'children view-json)) 0))
-                    (beginning-of-buffer)
                     (make-local-variable 'view-root)
                     (make-local-variable 'view-depth)
                     (make-local-variable 'view-style)

    (interactive)
    (message (number-to-string (length (defined-colors)))))

(global-set-key (kbd "C-c s") 'search)
(global-set-key (kbd "C-c p") 'push-view)
(global-set-key (kbd "C-c l") 'visit-link)

(global-set-key (kbd "C-c C-w C-[ .") 'increase-min-weight)
(global-set-key (kbd "C-c C-w C-] ,") 'decrease-max-weight)
(global-set-key (kbd "C-c C-w C-] .") 'increase-max-weight)
(global-set-key (kbd "C-c C-s C-[ ,") 'decrease-min-sharability)
(global-set-key (kbd "C-c C-s C-[ .") 'increase-min-sharability)
(global-set-key (kbd "C-c C-s C-] ,") 'decrease-max-sharability)
(global-set-key (kbd "C-c C-s C-] .") 'increase-max-sharability)
(global-set-key (kbd "C-c C-l C-w ,") 'decrease-link-weight)
(global-set-key (kbd "C-c C-l C-w .") 'increase-link-weight)
(global-set-key (kbd "C-c C-t C-w ,") 'decrease-target-weight)
