[slime-devel] Re: HyperSpec 4.0, section lookup

Lennart Staflin <lenst@lysator.liu.se> writes:

I would like to suggest the following change to hyperspec.el

Thanks, applied.

--- hyperspec.el 30 Jun 2004 19:48:40 +0200 1.5 +++ hyperspec.el 02 Jul 2004 11:51:16 +0200 @@ -1135,10 +1135,9 @@ "") ".htm")))

-(defun common-lisp-hyperpsec-section-4.0 (indices) - (let ((string (format "%sBody/sec%s_" - common-lisp-hyperspec-root - (pop indices)))) +(defun common-lisp-hyperspec-section-4.0 (indices) + (let ((string (format "%sBody/sec_" + common-lisp-hyperspec-root))) (concat string (mapconcat (lambda (n) (format "%d" n))