# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1232243134 0
# Node ID 4bcf5c96d5eeee548e71727f6885ba3e7c5ee8af
# Parent  497ab52cc0720eaf35d53993a23b852012964bc0
* linum.el (linum-update-window): Use `delq' instead of `delete';
  compare strings with `equal-including-properties'.

diff -r 497ab52cc072 -r 4bcf5c96d5ee lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Jan 17 22:27:54 2009 +0000
+++ b/lisp/ChangeLog	Sun Jan 18 01:45:34 2009 +0000
@@ -1,3 +1,8 @@
+2009-01-18  Markus Triska  <markus.triska@gmx.at>
+
+	* linum.el (linum-update-window): Use `delq' instead of `delete';
+	compare strings with `equal-including-properties'.
+
 2009-01-17  Glenn Morris  <rgm@gnu.org>
 
 	* progmodes/cc-langs.el (declare-function): Add compatibility stub.
diff -r 497ab52cc072 -r 4bcf5c96d5ee lisp/linum.el
--- a/lisp/linum.el	Sat Jan 17 22:27:54 2009 +0000
+++ b/lisp/linum.el	Sun Jan 18 01:45:34 2009 +0000
@@ -146,10 +146,11 @@
                     (funcall linum-format line)))
              (visited (catch 'visited
                         (dolist (o (overlays-in (point) (point)))
-                          (when (string= (overlay-get o 'linum-str) str)
+                          (when (equal-including-properties
+				 (overlay-get o 'linum-str) str)
                             (unless (memq o linum-overlays)
                               (push o linum-overlays))
-                            (setq linum-available (delete o linum-available))
+                            (setq linum-available (delq o linum-available))
                             (throw 'visited t))))))
         (setq width (max width (length str)))
         (unless visited