Rename source and info.

src/web-static.scm

@@ -63,7 +63,7 @@
 	 (print (member-total-balance mr))))
      (with-output-to-file (make-pathname dir (sprintf "~A.misc" nick))
        (lambda ()
-	 (let loop ((lines (member-source mr)))
+	 (let loop ((lines (brmember-source mr)))
 	   (when (not (null? lines))
 	     (print (car lines))
 	     (loop (cdr lines))))))