vm-delete-duplicates ruthlessly discarding addresses

Thread View: gnu.emacs.vm.bug

1 messages

[T] Back to Threads [V] Tree View [G] Group Articles

1 total messages Started by Joe Wells Fri, 30 Oct 1992 18:43

Author: Joe Wells
Date: Fri, 30 Oct 1992 18:43

22 lines
1086 bytes

VM 5.32.

(vm-delete-duplicates '("a" "b" "b" "c" "c")) ==> ("a" "c")

The fix is to insert (setq prev (cdr prev)) at the right place:

----------------------------------------------------------------------
--- vm-misc.el-dist	Thu Apr  9 01:30:54 1992
+++ vm-misc.el	Fri Oct 30 13:42:19 1992
@@ -237,6 +237,7 @@
 		  prev (if all nil p)
 		  p (cdr p))
 	  (setcdr prev (if all (cdr p) p))
+	  (setq prev (cdr prev))
 	  (setq p (cdr p)))))
     list ))
 
----------------------------------------------------------------------

-- 
Joe Wells <jbw@cs.bu.edu>
Member of the League for Programming Freedom --- send e-mail for details

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads