From xemacs-m  Wed May 28 09:12:14 1997
Received: from newman.aventail.com (root@newman.aventail.com [199.238.236.1])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id JAA01683
	for <xemacs-beta@xemacs.org>; Wed, 28 May 1997 09:12:13 -0500 (CDT)
Received: from kramer.in.aventail.com.aventail.com (wmperry@[192.168.1.12])
	by newman.aventail.com (8.8.5/8.8.5) with SMTP id HAA09330
	for <xemacs-beta@xemacs.org>; Wed, 28 May 1997 07:12:13 -0700 (PDT)
Date: Wed, 28 May 1997 07:12:13 -0700 (PDT)
Message-Id: <199705281412.HAA09330@newman.aventail.com>
From: "William M. Perry" <wmperry@aventail.com>
To: xemacs-beta@xemacs.org
Subject: PATCH: vc-directory broken again
Errors-to: wmperry@aventail.com
Reply-to: wmperry@aventail.com
X-Face: O~Rn;(l][/-o1sALg4A@xpE:9-"'IR[%;,,!m7</SYF`{vYQ(&RI1&EiH[FvT;J}@f!4kfz
 x_!Y#=y{Uuj9GvUi=cPuajQ(Z42R[wE@{G,sn$qGr5g/wnb*"*ktI+,CD}1Z'wxrM2ag-r0p5I6\nA
 [WJopW_J.WY;

Voila.

-Bill P.

*** vc.el	1997/05/28 14:09:36	1.1
--- vc.el	1997/05/28 14:09:48
***************
*** 1370,1376 ****
        (setq dirname (concat dirname "/")))
    (let (nonempty
  	(dl (if (featurep 'xemacs)
! 		(+ 1 (length (directory-file-name (expand-file-name dir))))
  	      (length dirname)))
  	(filelist nil) (statelist nil)
  	(old-dir default-directory)
--- 1370,1376 ----
        (setq dirname (concat dirname "/")))
    (let (nonempty
  	(dl (if (featurep 'xemacs)
! 		(+ 1 (length (directory-file-name (expand-file-name dirname))))
  	      (length dirname)))
  	(filelist nil) (statelist nil)
  	(old-dir default-directory)

