From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Giorgos Keramidas Newsgroups: gmane.emacs.help Subject: Re: how do I know that the buffer is narrowed Date: Thu, 01 Dec 2005 13:31:41 +0200 Organization: SunSITE.dk - Supporting Open source Message-ID: <86mzjlt5nm.fsf@flame.pc> References: <87vey9kcrk.fsf@thalassa.informatimago.com> <85oe41hgvq.fsf@lola.goethe.zz> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: sea.gmane.org 1133441928 21719 80.91.229.2 (1 Dec 2005 12:58:48 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 1 Dec 2005 12:58:48 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Thu Dec 01 13:58:40 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1EhnzY-00005t-JK for geh-help-gnu-emacs@m.gmane.org; Thu, 01 Dec 2005 13:56:52 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1EhnzX-00072O-KX for geh-help-gnu-emacs@m.gmane.org; Thu, 01 Dec 2005 07:56:51 -0500 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!postnews.google.com!news4.google.com!news.glorb.com!dotsrc.org!news.dotsrc.org!not-for-mail Original-Newsgroups: gnu.emacs.help User-Agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (berkeley-unix) Cancel-Lock: sha1:eiJXiCoPrILwUGqDqjn5eZOsYa8= Original-Lines: 19 Original-NNTP-Posting-Host: 62.103.39.226 Original-X-Trace: news.sunsite.dk DXC=:5@@mPWVaQ0@@_Mk5OIoD3YSB=nbEKnk; cQPa]ZAAG1=L^Mj72:ak; I7eU]76nT6d; jI9i?S2cS[0kYGR9 Original-X-Complaints-To: staff@sunsite.dk Original-Xref: shelby.stanford.edu gnu.emacs.help:135958 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:31565 Archived-At: On Thu, 01 Dec 2005 00:10:01 +0100, David Kastrup wrote: > bojohan+news@dd.chalmers.se (Johan Bockgård) writes: >>> (defun narrowedp () >>> (not (equal (list (point-min) (point-max)) >>> (save-restriction (widen) (list (point-min) (point-max)))))) >> >> >> (not (and (= (point-min) 1) >> (= (point-max) (1+ (buffer-size))))) > > (<(-(point-max)(point-min))(buffer-size)) Pfeh! Is there any good reason to obfuscate the beautiful: (not (and (= (point-min) 1) (= (point-max) (1+ (buffer-size))))) *and* remove all its spaces? :)