From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: KOBAYASHI Yasuhiro Newsgroups: gmane.emacs.devel Subject: Re: Slow access to files using UNC path Date: Wed, 25 Aug 2004 18:44:08 +0900 Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Message-ID: References: <1089978045.7826.200489429@webmail.messagingengine.com> <1090070598.482.200548261@webmail.messagingengine.com> <2914-Sun18Jul2004070932+0300-eliz@gnu.org> <1090131145.14224.200572407@webmail.messagingengine.com> <2914-Sun18Jul2004214112+0300-eliz@gnu.org> <1090211717.23633.200609317@webmail.messagingengine.com> <7494-Mon19Jul2004210954+0300-eliz@gnu.org> NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: sea.gmane.org 1093460916 20337 80.91.224.253 (25 Aug 2004 19:08:36 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 25 Aug 2004 19:08:36 +0000 (UTC) Cc: Dhruva Krishnamurthy Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Aug 25 21:08:14 2004 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1C0381-0007U0-00 for ; Wed, 25 Aug 2004 21:08:13 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.33) id 1C03Cb-0000VC-GS for ged-emacs-devel@m.gmane.org; Wed, 25 Aug 2004 15:12:57 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.33) id 1C01ZI-0005b7-FU for emacs-devel@gnu.org; Wed, 25 Aug 2004 13:28:16 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.33) id 1C01ZG-0005ZH-8A for emacs-devel@gnu.org; Wed, 25 Aug 2004 13:28:15 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.33) id 1C00zM-0001aK-Bk for emacs-devel@gnu.org; Wed, 25 Aug 2004 12:51:08 -0400 Original-Received: from [210.157.254.238] (helo=mail.otsukakj.co.jp) by monty-python.gnu.org with esmtp (Exim 4.34) id 1BzuJG-0004P3-5b for emacs-devel@gnu.org; Wed, 25 Aug 2004 05:43:14 -0400 Original-Received: from NSZ124 (localhost [127.0.0.1]) by mail.otsukakj.co.jp (8.12.10/8.12.10) with ESMTP id i7P9h2Yf003344; Wed, 25 Aug 2004 18:43:03 +0900 (JST) Original-To: emacs-devel@gnu.org X-Face: sx{*Zd5t@lP<&#~%3p=Z'z@ru$R6Bvwu3`mD?-!>[pr@Do`[`tu-$[0\OB6%gb:z/7 iuq3LblNTXV@AU\/w=hI[\w}\Hr1UM~>x\cQtaXq&w:LcZn/yvAOIHk"^$laja@tc|:Y"DC]/F!W"D "*_Y$vOKK5 X-PGP-DSS: BE16 34D8 BC0B 52B5 0E86 9D4B 9B89 77B3 1D8D A872 X-PGP-Key: http://homepage3.nifty.com/y3tk/gpg/pubkey.asc User-Agent: Gnus/5.110003 (No Gnus v0.3) Emacs/21.3.50 (i386-mingw-nt5.1.2600) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:26496 --=-=-= Maybe I found out the reason why slow access occured. '(file-directory-p "//{arch}")' or '(file-directory-p "//MCVS/CVS")' is executed in vc-arch-registered or vc-mcvs-registered even though '{arch}' or 'MCVS' as computers dosen't exist. So what about the following patch? --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=vc.patch Content-Description: vc *** ~/src/emacs/current/lisp/vc-arch.el Wed Aug 25 00:27:47 2004 --- ~/src/emacs/current/lisp/vc-arch.el.orig Wed Aug 25 17:19:14 2004 *************** *** 76,81 **** --- 76,83 ---- ;;;###autoload (while (and (stringp dir) ;;;###autoload (not (equal ;;;###autoload dir (setq dir (file-name-directory dir)))) + ;;;###autoload ;; Avoid searching no existing computer on Windowz. + ;;;###autoload (not (string-match "^\\(//\\|\\\\\\\\\\)$" dir)) ;;;###autoload dir) ;;;###autoload (setq dir (if (file-directory-p ;;;###autoload (expand-file-name "{arch}" dir)) *** c:/usr/emacs/current/lisp/vc-mcvs.el Wed Aug 25 00:25:45 2004 --- c:/home/kobayays/src/emacs-ime/lisp/vc-mcvs.el Wed Aug 25 17:19:52 2004 *************** *** 118,123 **** --- 118,125 ---- ;;;###autoload (while (and (stringp dir) ;;;###autoload (not (equal ;;;###autoload dir (setq dir (file-name-directory dir)))) + ;;;###autoload ;; avoid searching no existing computer on Windowz. + ;;;###autoload (not (string-match "^\\(//\\|\\\\\\\\\\)$" dir)) ;;;###autoload dir) ;;;###autoload (setq dir (if (file-directory-p ;;;###autoload (expand-file-name "MCVS/CVS" dir)) --=-=-= -- KOBAYASHI Yasuhiro --=-=-= Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel --=-=-=--