From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "B. T. Raven" Newsgroups: gmane.emacs.help Subject: why is this function not instantaneous? Date: Tue, 19 Mar 2013 15:04:35 -0500 Organization: NewsGuy - Unlimited Usenet $23.95 Message-ID: NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 7bit X-Trace: ger.gmane.org 1363724846 25450 80.91.229.3 (19 Mar 2013 20:27:26 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Tue, 19 Mar 2013 20:27:26 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Tue Mar 19 21:27:52 2013 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1UI38N-0005qY-Q7 for geh-help-gnu-emacs@m.gmane.org; Tue, 19 Mar 2013 21:27:47 +0100 Original-Received: from localhost ([::1]:54665 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UI380-0004ij-FE for geh-help-gnu-emacs@m.gmane.org; Tue, 19 Mar 2013 16:27:24 -0400 Original-Path: usenet.stanford.edu!newsfeed.hal-mli.net!feeder3.hal-mli.net!newsfeed.hal-mli.net!feeder1.hal-mli.net!border3.nntp.dca.giganews.com!border1.nntp.dca.giganews.com!nntp.giganews.com!nx02.iad01.newshosting.com!newshosting.com!69.16.185.16.MISMATCH!npeer02.iad.highwinds-media.com!news.highwinds-media.com!feed-me.highwinds-media.com!spln!extra.newsguy.com!newsp.newsguy.com!news7 Original-Newsgroups: gnu.emacs.help Original-Lines: 26 Original-NNTP-Posting-Host: p518237da67810ac20fc035f75810adf19e717abb46df67e1.newsdawg.com User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:15.0) Gecko/20120907 Thunderbird/15.0.1 X-Received-Bytes: 1411 Original-Xref: usenet.stanford.edu gnu.emacs.help:197324 X-Mailman-Approved-At: Tue, 19 Mar 2013 16:27:10 -0400 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:89600 Archived-At: A few months ago I somehow misplaced the original of this function: (defun copy-to-other-window (beg end) ;; bind to f8 "Copy region text to buffer in other window\n" (interactive "r") (if (not (use-region-p)) (progn (backward-word) (let ((beg (point))) (forward-word) (copy-region-as-kill \ beg (point))) )) (other-window 1) (yank) ) The earlier version worked with no extraneous disk activity going on. This version bogs down for 2, 3, or 4 seconds while showing the Windows 7 whirly disk. If transient mark mode is inactive, the "if" form makes a region out of the word where the cursor is at or inside of. Does any of you know what this little function would look like if I knew what I were doing? Thanks, Ed