From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Lorenzo Isella Newsgroups: gmane.emacs.help Subject: Search for selected tex Date: Sat, 14 Jun 2008 18:30:03 +0200 Message-ID: <4853F20B.5030802@gmail.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit X-Trace: ger.gmane.org 1213461416 11448 80.91.229.12 (14 Jun 2008 16:36:56 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Sat, 14 Jun 2008 16:36:56 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Sat Jun 14 18:37:39 2008 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1K7Yl0-0005bp-SL for geh-help-gnu-emacs@m.gmane.org; Sat, 14 Jun 2008 18:37:39 +0200 Original-Received: from localhost ([127.0.0.1]:59559 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1K7YkC-0002uE-Sq for geh-help-gnu-emacs@m.gmane.org; Sat, 14 Jun 2008 12:36:48 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1K7Ydm-0005SU-FF for help-gnu-emacs@gnu.org; Sat, 14 Jun 2008 12:30:10 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1K7Ydk-0005R2-AR for help-gnu-emacs@gnu.org; Sat, 14 Jun 2008 12:30:09 -0400 Original-Received: from [199.232.76.173] (port=59666 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1K7Ydk-0005Qw-5h for help-gnu-emacs@gnu.org; Sat, 14 Jun 2008 12:30:08 -0400 Original-Received: from fg-out-1718.google.com ([72.14.220.154]:36877) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1K7Ydj-000660-R8 for help-gnu-emacs@gnu.org; Sat, 14 Jun 2008 12:30:08 -0400 Original-Received: by fg-out-1718.google.com with SMTP id l26so3583756fgb.30 for ; Sat, 14 Jun 2008 09:30:06 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma; h=domainkey-signature:received:received:message-id:date:from :user-agent:mime-version:to:subject:content-type :content-transfer-encoding:sender; bh=Be/4lFA4TOHx5aFQqjz72clY+RSnr0rvKhEHeBQwzsE=; b=mw8i4A6T6uGBIXqvVLWUTRzWg0gwblPcPowtXZ4gLos+gPVOquzuxrBL6+tk2eS1sG pcgV9+B7Xv6IUlJKJNui+Bx/EobEp0dN1t5gapcAQF3kWaShyR/wvENS4qRRNfjl60XH JhQtaHL6F7M1+slBJzABqI6vzgyybKseyhakg= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=gamma; h=message-id:date:from:user-agent:mime-version:to:subject :content-type:content-transfer-encoding:sender; b=duzjBKRHyqKSmJUd+OugarjFCl2bjfeN1GFQyggA1kcWwdjwhpzBq78UBOU2kmI7dG fY5chZJiinUfQg0zp+VcGkuQqX/6UMGgdsjVr0QnMz7TyvHwILOJEDcBsiAqLVf6Dl7z BIE7IswgIaEheBXqwiKjSbxplvNGr188VimEs= Original-Received: by 10.86.93.17 with SMTP id q17mr5977888fgb.25.1213461006092; Sat, 14 Jun 2008 09:30:06 -0700 (PDT) Original-Received: from cappero.jrc.it ( [151.59.222.244]) by mx.google.com with ESMTPS id e20sm8904738fga.1.2008.06.14.09.30.04 (version=TLSv1/SSLv3 cipher=RC4-MD5); Sat, 14 Jun 2008 09:30:05 -0700 (PDT) User-Agent: Mozilla-Thunderbird 2.0.0.14 (X11/20080509) X-detected-kernel: by monty-python.gnu.org: Linux 2.6 (newer, 2) 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:54836 Archived-At: Dear All, I would like to be able to select some text with C-space and then look for it inside the buffer. I found some functions online which I modified to get: ;; a function to search the selected text (defun my-search-forward (begin end) (interactive (list (point) (mark))) (let ((text (filter-buffer-substring begin end nil t))) (goto-char (max begin end)) (let ((found-pos (search-forward text nil t))) (if (not found-pos) (progn (goto-char begin) (error "not found")) (progn (goto-char found-pos) (set-mark (- found-pos (length text)))))))) (define-key global-map [(control q )] 'my-search-forward) It is almost there but not yet... If I highlight some text, I can look for it with C-q, but once at the end of the buffer, it stops searching (whereas I would like it to search from the beginning of the buffer). If then I move to the beginning of the buffer, not everything above my last position is selected, but also the function loses memory of what I was looking for... Anybody can give me some help? Apologies if there is already and emacs command for that, but my online search was not fruitful. Cheers Lorenzo