bug#864: marked as done (23.0.60; Info-dir-remove-duplicates fails to remove duplicates)

[Emacs bug Tracking System]

Your message dated Sun, 07 Sep 2008 12:05:31 +0200
with message-id <48C3A76B.1020604@gmx.at>
and subject line Re: bug#864: 23.0.60;  Info-dir-remove-duplicates fails to 
remove duplicates
has caused the Emacs bug report #864,
regarding 23.0.60; Info-dir-remove-duplicates fails to remove duplicates
to be marked as done.

This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
bug report if necessary, and/or fix the problem forthwith.

(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact don@donarmstrong.com
immediately.)


-- 
864: http://emacsbugs.donarmstrong.com/cgi-bin/bugreport.cgi?bug=864
Emacs Bug Tracking System
Contact don@donarmstrong.com with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> 23.0.60; Info-dir-remove-duplicates fails to remove duplicates
>
>
>
>
> Date: 
>
> Wed, 03 Sep 2008 00:26:19 +0900
>
>
>
>
> User-agent: 
>
> Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.0.2pre) Gecko/2008082101 SeaMonkey/2.0a1pre
>
>
>
>
> Hi,
> I use NTEmacs with Cygwin, and something like this in my ~/.emacs.
>     (setq Info-directory-list (list (expand-file-name "../info" 
> data-directory) "c:/cygwin/usr/share/info"))
> Then the Info Directory Node lists some duplicated items.
>
> I did bellow patch to fix this. (You know, I am not a good Lisp programmer.)
>
> Index: lisp/info.el
> ===================================================================
> RCS file: /sources/emacs/emacs/lisp/info.el,v
> retrieving revision 1.541
> diff -u -d -w -r1.541 info.el
> --- lisp/info.el    30 Aug 2008 20:16:36 -0000    1.541
> +++ lisp/info.el    2 Sep 2008 15:05:54 -0000
> @@ -1222,9 +1222,10 @@
>            ;; Fold case straight away; `member-ignore-case' here wasteful.
>            (let ((x (downcase (match-string 1))))
>            (if (member x seen)
> -              (delete-region (match-beginning 0)
> +              (progn (delete-region (match-beginning 0)
>                       (progn (re-search-forward "^[^ \t]" nil t)
>                          (match-beginning 0)))
> +                   (forward-line 0))
>              (push x seen))))))))))
>
>  ;; Note that on entry to this function the current-buffer must be the
>
>
>
>
>
>
> --- End Message ---
> --- Begin Message ---
>
>
>
> Subject: 
>
> Re: bug#864: 23.0.60;	Info-dir-remove-duplicates fails to remove duplicates
>
>
>
>
> Date: 
>
> Sun, 07 Sep 2008 12:05:31 +0200
>
>
>
>
> User-agent: 
>
> Thunderbird 2.0.0.16 (Windows/20080708)
>
>
>
>
> Fixed as
>
> 2008-09-04  Martin Rudalics  <rudalics@gmx.at>
>
>         * info.el (Info-dir-remove-duplicates): Narrow buffer when
>         removing duplicate entries under same heading.  Don't skip char
>         matching anything but a space or tab at bol.  (Bug#864)
>
> Thanks
>
>
>
> --- End Message ---