                         (setq line (concat line space))
                         (let ((bullet (if target-has-children "+" "\u00b7")))   ;; previously: "-" or "\u25ba"
                             (setq line (concat line
-                                (colorize bullet target-weight target-sharability target-priority nil target-alias target-meta)
+                                (colorize bullet
+                                    target-weight target-sharability target-priority nil target-alias target-meta)
                                 id-infix
                                 " "
                                 (colorize (delimit-value target-value)


(defun set-min-weight (s)
    (if (and (in-setproperties-mode) (>= s 0) (<= s 1))
        (request-view t smsn-mode smsn-root-id smsn-height smsn-style smsn-min-sharability smsn-max-sharability smsn-default-sharability s smsn-max-weight smsn-default-weight)
        (error-message
            (concat "min weight " (number-to-string s) " is outside of range [0, 1]"))))


;; Brain-mode: the MyOtherBrain Emacs library
;;
;; Required global variables:
;;
;;     smsn-rexster-url: IP, port, and local path to the rexster server
;;     smsn-rexster-graph: name of MyOtherBrain graph served by Rexster
;;
;; Optional global variables:
;;
