From xemacs-m  Mon Mar 24 02:22:33 1997
Received: from bittersweet.inetarena.com (karlheg@bittersweet.inetarena.com [206.129.216.38])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id CAA17871
	for <xemacs-beta@xemacs.org>; Mon, 24 Mar 1997 02:22:31 -0600 (CST)
Received: (from karlheg@localhost)
	by bittersweet.inetarena.com (8.8.5/8.8.5) id AAA07840;
	Mon, 24 Mar 1997 00:22:06 -0800
Date: Mon, 24 Mar 1997 00:22:06 -0800
Message-Id: <199703240822.AAA07840@bittersweet.inetarena.com>
From: "Karl M. Hegbloom" <karlheg@inetarena.com>
To: <xemacs-beta@xemacs.org>
Subject: [19.15b104] efs / HTML mode bug
Comments: Hyperbole mail buttons accepted, v04.023.
Mime-Version: 1.0 (generated by tm-edit 7.106)
Content-Type: multipart/mixed;
 boundary="Multipart_Mon_Mar_24_00:22:04_1997-1"
Content-Transfer-Encoding: 7bit

--Multipart_Mon_Mar_24_00:22:04_1997-1
Content-Type: text/plain; charset=US-ASCII


 I was using 'efs' to edit
/karlheg@inetarena:~/public_html/HEADER.html, and selected | DTD |
Save Parsed DTD |, and got this:


--Multipart_Mon_Mar_24_00:22:04_1997-1
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable

Signaling: (wrong-number-of-arguments #<compiled-function (from "efs.elc") =
(directory &optional full match nosort) "...(133)" [expand-file-name direct=
ory efs-ftp-path parsed efs-internal-file-name-as-directory efs-host-type n=
il files efs-barf-if-not-directory efs-hash-table-keys efs-get-files nosort=
 full match f res match-data case-fold-search cfs buff match-data ((byte-co=
de "=C0=C1=C2=8F=88=C3=0C!=87" [nil (byte-code "=8A=08q=88=09=12)=C3=87" [b=
uff cfs case-fold-search nil] 1) ((error)) store-match-data match-data] 3))=
 string-match mapcar #<compiled-function (from "efs.elc") (fn) "...(4)" [di=
rectory fn] 2>] 4> 5)
  efs-directory-files("/karlheg@inetarena:/home/karlheg/public_html/" nil n=
il nil t)
  apply(efs-directory-files ("/karlheg@inetarena:/home/karlheg/public_html/=
" nil nil nil t))
  efs-file-handler-function(directory-files "/karlheg@inetarena:/home/karlh=
eg/public_html/" nil nil nil t)
  directory-files("/karlheg@inetarena:/home/karlheg/public_html/" nil nil n=
il t)
  apply(directory-files ("/karlheg@inetarena:/home/karlheg/public_html/" ni=
l nil nil t))
  dired-handler-fn(directory-files "/karlheg@inetarena:/home/karlheg/public=
_html/" nil nil nil t)
  directory-files("/karlheg@inetarena:/home/karlheg/public_html/" nil nil n=
il t)
  mouse-file-display-completion-list(#<window on "*Completions*" 0x318d> "/=
karlheg@inetarena:/home/karlheg/public_html/" #<buffer " *Minibuf-0*"> (#<b=
uffer "*Completions*"> #<buffer " *mouse-read-file*"> #<window on "*Complet=
ions*" 0x318d> #<window on " *mouse-read-file*" 0x3174>))
  #<compiled-function (from "minibuf.elc") nil "...(39)" [file-p mouse-dire=
ctory-display-completion-list filewin dir user-data mouse-file-display-comp=
letion-list dirwin make-local-variable completion-display-completion-list-f=
unction #<compiled-function (from "minibuf.elc") ... "...(12)" ... 8> remov=
e-hook minibuffer-setup-hook rfhookfun] 5>()
  read-minibuffer-internal("Save DTD in: ")
  byte-code("=C0 =C1 V=AB=8A=C2=89=1B=1C=C5=0E=06!*=87=C5=0E=06!=87" [recur=
sion-depth minibuffer-depth t standard-input standard-output read-minibuffe=
r-internal prompt] 2)
  read-from-minibuffer("Save DTD in: " ("/inetarena:~/public_html/HEADER.ce=
d" . 25) #<keymap read-file-name-map 2 entries 0x4e9> nil file-name-history=
)
  read-file-name-2(file-name-history "Save DTD in: " "/karlheg@inetarena:/h=
ome/karlheg/public_html/" "/karlheg@inetarena:/home/karlheg/public_html/HEA=
DER.ced" nil "HEADER.ced" read-file-name-internal)
  mouse-read-file-name-1(file-name-history "Save DTD in: " "/karlheg@inetar=
ena:/home/karlheg/public_html/" "/karlheg@inetarena:/home/karlheg/public_ht=
ml/HEADER.ced" nil "HEADER.ced" read-file-name-internal)
  read-file-name-1(file-name-history "Save DTD in: " "/karlheg@inetarena:/h=
ome/karlheg/public_html/" "/karlheg@inetarena:/home/karlheg/public_html/HEA=
DER.ced" nil "HEADER.ced" read-file-name-internal)
  read-file-name("Save DTD in: " "/karlheg@inetarena:/home/karlheg/public_h=
tml/" "/karlheg@inetarena:/home/karlheg/public_html/HEADER.ced" nil "HEADER=
.ced")
  (list (read-file-name "Save DTD in: " dir tem nil nam))
)
  (let* ((tem ...) (dir ...) (nam ...)) (list (read-file-name "Save DTD in:=
 " dir tem nil nam)))
)
  call-interactively(sgml-save-dtd)


--Multipart_Mon_Mar_24_00:22:04_1997-1
Content-Type: text/plain; charset=US-ASCII

Karl M. Hegbloom <karlheg@inetarena.com>
http://www.inetarena.com/~karlheg
Portland, OR  USA
Debian GNU 1.2  Linux 2.0.29t


--Multipart_Mon_Mar_24_00:22:04_1997-1--

