[slime-cvs] CVS slime/contrib

[mkoeppe]

Update of /project/slime/cvsroot/slime/contrib
In directory clnet:/tmp/cvs-serv884/contrib

Added Files:
	slime-presentation-streams.el 
Log Message:
* slime-presentation-streams.el: New file.



--- /project/slime/cvsroot/slime/contrib/slime-presentation-streams.el	2007/08/24 07:00:05	NONE
+++ /project/slime/cvsroot/slime/contrib/slime-presentation-streams.el	2007/08/24 07:00:05	1.1
;;; swank-presentation-streams.el --- Streams that allow attaching object identities
;;;                                   to portions of output
;;;
;;; Authors: Alan Ruttenberg  <alanr-l at mumble.net>
;;;          Matthias Koeppe  <mkoeppe at mail.math.uni-magdeburg.de>
;;;          Helmut Eller  <heller at common-lisp.net>
;;;
;;; License: GNU GPL (same license as Emacs)
;;;
;;; Installation
;;
;; Add this to your .emacs: 
;;
;;   (add-to-list 'load-path "<directory-of-this-file>")
;;   (add-hook 'slime-load-hook (lambda () (require 'slime-presentation-streams)))
;;


;;; Initialization

(add-hook 'slime-connected-hook 'slime-install-presentation-streams)

(defun slime-install-presentation-streams ()
  (slime-eval-async '(swank:swank-require :swank-presentation-streams)))

(provide 'slime-presentation-streams)