From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/40226
Path: main.gmane.org!not-for-mail
From: Michael.Cook@cisco.com
Newsgroups: gmane.emacs.gnus.general
Subject: gnus-summary-crosspost-article
Date: Mon, 12 Nov 2001 13:08:50 -0500
Sender: owner-ding@hpc.uh.edu
Message-ID: <g08bsi73lql.fsf@zzz.cisco.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035175809 32204 80.91.224.250 (21 Oct 2002 04:50:09 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 04:50:09 +0000 (UTC)
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: (qmail 21460 invoked from network); 12 Nov 2001 18:14:13 -0000
Original-Received: from malifon.math.uh.edu (129.7.128.13)
  by mastaler.com with SMTP; 12 Nov 2001 18:14:13 -0000
Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists)
	by malifon.math.uh.edu with esmtp (Exim 3.20 #1)
	id 163LX0-0001YI-00; Mon, 12 Nov 2001 12:10:02 -0600
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Mon, 12 Nov 2001 12:09:44 -0600 (CST)
Original-Received: from sclp3.sclp.com (qmailr@sclp3.sclp.com [209.196.61.66])
	by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id MAA18259
	for <ding@hpc.uh.edu>; Mon, 12 Nov 2001 12:09:30 -0600 (CST)
Original-Received: (qmail 21373 invoked by alias); 12 Nov 2001 18:09:25 -0000
Original-Received: (qmail 21368 invoked from network); 12 Nov 2001 18:09:25 -0000
Original-Received: from funnel.cisco.com (161.44.168.79)
  by gnus.org with SMTP; 12 Nov 2001 18:09:25 -0000
Original-Received: from spamsicle.cisco.com (mirapoint@spamsicle.cisco.com [161.44.172.225]) by funnel.cisco.com (8.8.5-Cisco.1/8.6.5) with ESMTP id NAA07246 for <ding@gnus.org>; Mon, 12 Nov 2001 13:08:57 -0500 (EST)
Original-Received: from zzz.cisco.com (zzz.cisco.com [10.89.5.93])
	by spamsicle.cisco.com (Mirapoint)
	with ESMTP id ABO00819;
	Mon, 12 Nov 2001 13:08:56 -0500 (EST)
Original-Received: (from zzz@localhost)
	by zzz.cisco.com (8.11.6/8.11.6) id fACI8oe05712;
	Mon, 12 Nov 2001 13:08:50 -0500
Original-To: ding@gnus.org
X-Face: (::$,F}2XQ8GxBqsXCX?#09yY8mkcV?KEWi->CVJP*t3$PVv?E?;Fk34-6ppt@j'g?kWY_[
 d:Xe(0a{$'N_Pv>/P&%U'\V`vimMH`er!2Z&*I]s-MWnUH]Ck+.D!"u`\LtI~'`N@I:o$a<H'+GLC'
 TbN
Original-Lines: 35
User-Agent: Gnus/5.090004 (Oort Gnus v0.04) Emacs/21.1 (i686-pc-linux-gnu)
Precedence: list
X-Majordomo: 1.94.jlt7
Xref: main.gmane.org gmane.emacs.gnus.general:40226
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:40226

gnus-summary-crosspost-article hasn't been working recently (Oort
Gnus v0.04, GNU Emacs 21.1.1).  it causes a stack trace like this:

Debugger entered--Lisp error: (wrong-type-argument sequencep 26628)
  gnus-summary-move-article(nil nil nil crosspost)
  gnus-summary-crosspost-article(nil)
  call-interactively(gnus-summary-crosspost-article)

the following changes seem to fix the problem:

--- gnus-sum.el.~1~	Mon Nov 12 12:55:16 2001
+++ gnus-sum.el	Mon Nov 12 13:01:42 2001
@@ -8077,7 +8077,7 @@
 		      (mail-header-xref (gnus-summary-article-header article))
 		      " ")))
 	   (setq new-xref (concat (gnus-group-real-name gnus-newsgroup-name)
-				  ":" article))
+				  ":" (number-to-string article)))
 	   (unless xref
 	     (setq xref (list (system-name))))
 	   (setq new-xref
@@ -8094,7 +8094,8 @@
 				(gnus-request-accept-article
 				 to-newsgroup select-method (not articles))))
 	       (setq new-xref (concat new-xref " " (car art-group)
-				      ":" (cdr art-group)))
+				      ":"
+				      (number-to-string (cdr art-group))))
 	       ;; Now we have the new Xrefs header, so we insert
 	       ;; it and replace the new article.
 	       (nnheader-replace-header "Xref" new-xref)

maybe someone would commit these changes into cvs.

m.