pict: fix ~number_from in rhombusblock_etc

Author: mflatt

rhombus-pict-lib/rhombus/pict/rhombus.rhm

@@ -49,6 +49,7 @@ def (render_line,
                    | #'identifier || #'plain: p.colorize(current_identifier_color())
                    | #'paren: p.colorize(current_paren_color())
                    | #'comment: p.colorize(current_comment_color())
+                   | #'lineno: beside.baseline(p.colorize("blue").scale(0.8), rtt(" "))
                    | ~else: p
                ~render_in_space:
                  fun (space, str, od,

rhombus-pict/info.rkt

@@ -12,6 +12,7 @@
                      "rhombus-draw"
                      "rhombus-lib"
                      "rhombus-scribble-lib"
+                     "rhombus-scribble" ; for `rhombusblock_etc` reference
                      "rhombus-slideshow"))
 
 (define pkg-desc "Rhombus functional-picture library")

rhombus-pict/rhombus/pict/scribblings/rhombus.scrbl

@@ -11,7 +11,7 @@
 @(namespace ~open:
     import:
       meta_label:
-        scribble/rhombus
+        scribble/rhombus/manual open
     export scribble_rhombusblock_etc
     def scribble_rhombusblock_etc:
       @rhombus(rhombusblock_etc))

shrubbery-render-lib/shrubbery/render/private/render.rkt

@@ -385,7 +385,7 @@
                                             [max-n (+ (sub1 len) number-from)])
                                         (define s (number->string n))
                                         (define max-s (number->string max-n))
-                                        (string-append
+                                        (string-append-immutable
                                          (make-string (- (string-length max-s) (string-length s)) #\space)
                                          s
                                          " "))))