From:	David Kastrup <David DOT Kastrup AT t-online DOT de>
Newsgroups:	comp.os.msdos.djgpp,comp.emacs
Subject:	Re: "shell" command in DJGPP Emacs?
Date:	09 Oct 2002 09:51:26 +0200
Organization:	T-Online
Lines:	36
Sender:	dak AT tupik DOT goethe DOT zz
Message-ID:	<x58z18vym9.fsf@tupik.goethe.zz>
References:	<3da26e84 DOT 3476875 AT news-server DOT optonline DOT net> <anu64k$mgp$1 AT nets3 DOT rz DOT RWTH-Aachen DOT DE> <3da2bdfe DOT 2802949 AT news-server DOT optonline DOT net> <x5ofa52m6q DOT fsf AT tupik DOT goethe DOT zz> <3da2c999 DOT 5774704 AT news-server DOT optonline DOT net> <slrnaq5llg DOT i0f DOT davep DOT news AT hagbard DOT davep DOT org> <3da36202 DOT 44798149 AT news-server DOT optonline DOT net>
Mime-Version:	1.0
X-Trace:	news.t-online.com 1034149888 02 28447 0CR2bf4GSrAZrs 021009 07:51:28
X-Complaints-To:	abuse AT t-online DOT com
X-Sender:	520018396234-0001 AT t-dialin DOT net
X-Face:	2FEFf>]>q>2iw=B6,xrUubRI>pR&Ml9=ao AT P@i)L:\urd*t9M~y1^:+Y]'C0~{mAl`oQuAl
	\!3KEIp?*w`|bL5qr,H)LFO6Q=qx~iH4DN;i";/yuIsqbLLCh/!U#X[S~(5eZ41to5f%E@'ELIi$t^
	Vc\LWP AT J5p^rst0+('>Er0=^1{]M9!p?&:\z]|;&=NP3AhB!B_bi^]Pfkw
User-Agent:	Gnus/5.09 (Gnus v5.9.0) Emacs/21.3.50
To:	djgpp AT delorie DOT com
DJ-Gateway:	from newsgroup comp.os.msdos.djgpp
Reply-To:	djgpp AT delorie DOT com

dmcg6174 AT yahoo DOT com (daniel gerard mcgrath) writes:

> On 8 Oct 2002 12:59:28 GMT, Dave Pearson <davep DOT news AT davep DOT org> wrote:
> 
> >* daniel gerard mcgrath <dmcg6174 AT yahoo DOT com>:
> >
> >> OK!  Well, actually, I need a function that works something like this:
> >> 
> >> (count-lines-in-file FILENAME)
> >> 
> >> where FILENAME is some sort of path name, like
> >> "/windows/dansstuf.txt", and the result being that the number of lines
> >> (i.e. newline characters) in DANSSTUF.TXT (or whatever) is returned
> >> from the "count-lines-in-file" function.
> >
> >(defun count-lines-in-file (file)
> >  "Count lines in FILE.
> >
> >If called as an interactive command, also display the count."
> >  (interactive "fFile: ")
> >  (with-temp-buffer
> >    (insert-file-contents-literally file)
> >    (let ((count (count-lines (point-min) (point-max))))
> >      (when (interactive-p)
> >        (message "%d" count))
> >      count)))
> >
> I don't have a "with-temp-buffer" function.

Obviously.  But your version of Emacs might.  Which is it, BTW?
Anything below 21.2 is certainly worth upgrading (21.2 is a bug fix
release for 21.1, and 21.1 is certainly a vast improvement over 20.x).

-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum
Email: David DOT Kastrup AT t-online DOT de

- Raw text -