(defun skelrc-banner (title &optional block)
(let* ((start (skel-lookup 'block-start))
(end (skel-lookup (if block 'block-banner-knob 'block-banner-end)))
(barlen (- 77 (length (concat start end " ----- " title)))))
(defun skelrc-banner (title &optional block)
(let* ((start (skel-lookup 'block-start))
(end (skel-lookup (if block 'block-banner-knob 'block-banner-end)))
(barlen (- 77 (length (concat start end " ----- " title)))))