diff lisp/select.el @ 5470:0af042a0c116

Merge with trunk.
author Mats Lidell <matsl@xemacs.org>
date Mon, 07 Feb 2011 21:22:17 +0100
parents 308d34e9f07d 2a54dfbe434f
children ac37a5f7e5be
line wrap: on
line diff
--- a/lisp/select.el	Sat Jan 22 00:59:20 2011 +0100
+++ b/lisp/select.el	Mon Feb 07 21:22:17 2011 +0100
@@ -765,7 +765,7 @@
 corresponding to that data as an end-glyph extent property of that space. "
   (let* ((str (make-string 1 ?\ ))
 	 (extent (make-extent 0 1 str))
-	 (glyph (make-glyph (vector image-type ':data value))))
+	 (glyph (make-glyph (vector image-type :data value))))
     (when glyph
       (set-extent-property extent 'invisible t)
       (set-extent-property extent 'start-open t)