     (interactive)
     (if (in-setproperties-mode)
         (lexical-let (
-                (mode smsn-mode)
-                (url (request-view-url smsn-root-id smsn-height smsn-style
-                    smsn-min-sharability smsn-max-sharability smsn-default-sharability
-                    smsn-min-weight smsn-max-weight smsn-default-weight)))
-            (setq smsn-current-line (line-number-at-pos))
-            (setq smsn-future-sharability smsn-default-sharability)
+                (mode brain-current-mode)
+                (url (request-view-url brain-current-root-id brain-current-height brain-current-style
+                    brain-current-min-sharability brain-current-max-sharability brain-current-default-sharability
+                    brain-current-min-weight brain-current-max-weight brain-current-default-weight)))
+            (setq brain-current-line (line-number-at-pos))
+            (setq brain-current-future-sharability brain-current-default-sharability)
             (http-get
                 (concat (base-url) "set?request=" (w3m-url-encode-string (json-encode
                     (list :id id :name name :value value))))

    (let ((s (string-match "\n" value)))
        (if s (let ((content (concat "\n" value "\n")))
            (concat "{{{"
                (if smsn-minimize-verbatim-blocks (propertize content 'invisible t) content)
            "}}}")) value)))

(defun write-view (editable children tree-indent)

                    (no-target))))))

;; note: for some reason, the id doesn't stay invisible when you paste it, although it stays light gray
(defun brain-copy-target-reference-to-clipboard ()
    "copy a reference to the atom at point to the system clipboard"
    (interactive)
    (let ((id (atom-id-at-point)))
