[slime-devel] Allegro Doc Lookup

[Thomas Schilling]

This is a (dirty) little hack to open the allegro docs from within Slime:

(defun allegro-doc-lookup (symbol)
   (interactive (list (slime-read-symbol-name "Allegro Doc for: ")))
   (slime-eval-async
    `(cg:eval-in-listener-thread '(cl:let ((wnd (cl:make-instance 
'cg:text-edit-window
							   :name :get-help :owner (cg:screen cg:*system*)
							   :state :shrunk :border :frame)))
				  (cl:format (cg:frame-child wnd) "~a" ',symbol)
				  (devel::windows-help-command wnd)
				  (cl:close wnd)))))

I didn't know where to integrate this in Slime (if even) so I thought this 
would be the best place to post it to.

-ts