From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!not-for-mail
From: Andreas Roehler <andreas.roehler@easy-emacs.de>
Newsgroups: gmane.emacs.help
Subject: paragraph-start-position
Date: Sat, 07 Oct 2006 13:43:01 +0200
Message-ID: <452792C5.7000504@easy-emacs.de>
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-15; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: sea.gmane.org 1160221403 5617 80.91.229.2 (7 Oct 2006 11:43:23 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Sat, 7 Oct 2006 11:43:23 +0000 (UTC)
Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Sat Oct 07 13:43:20 2006
Return-path: <help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org>
Envelope-to: geh-help-gnu-emacs@m.gmane.org
Original-Received: from lists.gnu.org ([199.232.76.165])
	by ciao.gmane.org with esmtp (Exim 4.43)
	id 1GWAaL-0007K5-Aw
	for geh-help-gnu-emacs@m.gmane.org; Sat, 07 Oct 2006 13:43:17 +0200
Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43)
	id 1GWAaK-00044J-PK
	for geh-help-gnu-emacs@m.gmane.org; Sat, 07 Oct 2006 07:43:16 -0400
Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43)
	id 1GWAa6-0003zg-Mi
	for help-gnu-emacs@gnu.org; Sat, 07 Oct 2006 07:43:02 -0400
Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43)
	id 1GWAa5-0003vL-3n
	for help-gnu-emacs@gnu.org; Sat, 07 Oct 2006 07:43:02 -0400
Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1GWAa4-0003uy-Sn
	for help-gnu-emacs@gnu.org; Sat, 07 Oct 2006 07:43:01 -0400
Original-Received: from [212.227.126.186] (helo=moutng.kundenserver.de)
	by monty-python.gnu.org with esmtp (Exim 4.52) id 1GWAhA-0000Om-GZ
	for help-gnu-emacs@gnu.org; Sat, 07 Oct 2006 07:50:20 -0400
Original-Received: from [84.190.177.205] (helo=[192.168.178.23])
	by mrelayeu.kundenserver.de (node=mrelayeu3) with ESMTP (Nemesis),
	id 0MKxQS-1GWAa3219N-0005hT; Sat, 07 Oct 2006 13:42:59 +0200
User-Agent: Thunderbird 1.5.0.4 (X11/20060516)
Original-To: help-gnu-emacs@gnu.org
X-Provags-ID: kundenserver.de abuse@kundenserver.de
	login:62d13292e0fce6aaed56aaadcb96352d
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 <help-gnu-emacs.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/pipermail/help-gnu-emacs>
List-Post: <mailto:help-gnu-emacs@gnu.org>
List-Help: <mailto:help-gnu-emacs-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=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:37877
Archived-At: <http://permalink.gmane.org/gmane.emacs.help/37877>

Just needed that. Comments welcome.

Thanks
__
Andreas Roehler


(defun paragraph-start-position ()
  "Returns paragraphs start position "
  (interactive)
  (save-match-data
  (save-excursion
    (if
    (re-search-backward paragraph-start nil t 1)
    (point)
      (point-min)))))

(defun paragraph-end-position ()
  "Returns paragraphs end position "
  (interactive)
  (save-match-data
  (save-excursion
    (if
    (re-search-forward paragraph-start nil t 1)
    (point)
      (point-max)))))


;;; end