[slime-cvs] CVS slime

[mbaringer]

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

Modified Files:
	slime.el ChangeLog 
Log Message:


--- /project/slime/cvsroot/slime/slime.el	2007/04/06 15:47:43	1.774
+++ /project/slime/cvsroot/slime/slime.el	2007/04/06 16:06:44	1.775
@@ -8367,7 +8367,8 @@
                sldb-previous-frame-number ,num
                point-entered sldb-fetch-more-frames
                start-open t
-               face sldb-section-face)
+               face sldb-section-face
+               mouse-face highlight)
        " --more--")
       (insert "\n"))))
 
@@ -8377,10 +8378,11 @@
   (destructuring-bind (number string) frame
     (let ((props `(frame ,frame sldb-default-action sldb-toggle-details)))
       (slime-propertize-region props
-        (insert " " (in-sldb-face frame-label (format "%2d:" number)) " ")
-        (slime-insert-possibly-as-rectangle
-         (slime-add-face (or face 'sldb-frame-line-face)
-                         string))
+        (slime-propertize-region '(mouse-face highlight)
+          (insert " " (in-sldb-face frame-label (format "%2d:" number)) " ")
+          (slime-insert-possibly-as-rectangle
+           (slime-add-face (or face 'sldb-frame-line-face)
+                           string)))
         (insert "\n")))))
 
 (defun sldb-fetch-more-frames (&rest ignore)
--- /project/slime/cvsroot/slime/ChangeLog	2007/04/06 15:47:44	1.1090
+++ /project/slime/cvsroot/slime/ChangeLog	2007/04/06 16:06:44	1.1091
@@ -1,3 +1,10 @@
+2007-04-06  Neil Van Dyke  <neil at neilvandyke.org>
+
+	* slime.el (sldb-insert-frame): Added mouse-face to frame label
+	and expression in Backtrace.
+	(sldb-insert-frames): Added mouse-face to "--more--" label in
+	Backtrace.
+
 2007-04-06 Michael Weber <michaelw+slime at foldr.org>
 
 	* slime.el (slime-call-defun): insert the closing parenthesis for