[Update js-expander to work with the latest slime
clinton@unknownlamer.org**20090917201043
 Ignore-this: 3f3eb164f828d6772ac409e48883bba
] {
hunk ./site-lisp/js-expander.el 10
-       (with-current-buffer (slime-get-temp-buffer-create buffer-name :mode buffer-mode :reusep t)
-         (setq slime-buffer-connection (slime-connection))
-         (setq slime-buffer-package package)
+       (slime-with-popup-buffer (buffer-name package t)
+         (funcall buffer-mode)
hunk ./site-lisp/js-expander.el 20
-  (slime-define-key key (lexical-let ((expander expander)
-                                      (buffer-name buffer-name)
-                                      (buffer-mode buffer-mode)
-                                      (printer printer))
-                          (lambda (&rest _)
-                            (interactive "P")
-                            (slime-eval-custom-expand expander
-                                                      (first (slime-sexp-at-point-for-macroexpansion))
-                                                      (slime-current-package)
-                                                      buffer-name
-                                                      buffer-mode
-                                                      printer)))
-                    :prefixed t :inferior t))
+  (define-key slime-mode-map (vector ?\C-c key)
+    (lexical-let ((expander expander)
+		  (buffer-name buffer-name)
+		  (buffer-mode buffer-mode)
+		  (printer printer))
+      (lambda (&rest _)
+	(interactive "P")
+	(slime-eval-custom-expand expander
+				  (first (slime-sexp-at-point-for-macroexpansion))
+				  (slime-current-package)
+				  buffer-name
+				  buffer-mode
+				  printer)))))
hunk ./site-lisp/js-expander.el 35
-(slime-add-custom-expander "j" 'ps:ps "*ParenScript generated Javascript*" 'js-mode #'read)
+(slime-add-custom-expander ?j 'ps:ps "*ParenScript generated Javascript*" 'js-mode #'read)
}