From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Brett Hoerner" Newsgroups: gmane.emacs.bugs Subject: bug#1475: Bind a few more common key combinations in mac-key-mode.el Date: Tue, 2 Dec 2008 17:01:57 -0600 Message-ID: Reply-To: Brett Hoerner , 1475@emacsbugs.donarmstrong.com NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 7bit X-Trace: ger.gmane.org 1228262102 20555 80.91.229.12 (2 Dec 2008 23:55:02 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Tue, 2 Dec 2008 23:55:02 +0000 (UTC) To: bug-gnu-emacs@gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Wed Dec 03 00:55:55 2008 Return-path: Envelope-to: geb-bug-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 1L7f5r-0003tX-0M for geb-bug-gnu-emacs@m.gmane.org; Wed, 03 Dec 2008 00:55:51 +0100 Original-Received: from localhost ([127.0.0.1]:43278 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1L7f4g-0005Ya-RL for geb-bug-gnu-emacs@m.gmane.org; Tue, 02 Dec 2008 18:54:38 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1L7eNm-00027S-Qe for bug-gnu-emacs@gnu.org; Tue, 02 Dec 2008 18:10:18 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1L7eNl-00026S-I0 for bug-gnu-emacs@gnu.org; Tue, 02 Dec 2008 18:10:18 -0500 Original-Received: from [199.232.76.173] (port=41321 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1L7eNk-00026A-MN for bug-gnu-emacs@gnu.org; Tue, 02 Dec 2008 18:10:16 -0500 Original-Received: from rzlab.ucr.edu ([138.23.92.77]:59128) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1L7eNk-0005yy-3C for bug-gnu-emacs@gnu.org; Tue, 02 Dec 2008 18:10:16 -0500 Original-Received: from rzlab.ucr.edu (rzlab.ucr.edu [127.0.0.1]) by rzlab.ucr.edu (8.13.8/8.13.8/Debian-3) with ESMTP id mB2NACbt031205; Tue, 2 Dec 2008 15:10:13 -0800 Original-Received: (from debbugs@localhost) by rzlab.ucr.edu (8.13.8/8.13.8/Submit) id mB2NA3hG030423; Tue, 2 Dec 2008 15:10:03 -0800 X-Loop: don@donarmstrong.com Resent-From: "Brett Hoerner" Resent-To: bug-submit-list@donarmstrong.com Resent-CC: Emacs Bugs Resent-Date: Tue, 02 Dec 2008 23:10:03 +0000 Resent-Message-ID: Resent-Sender: don@donarmstrong.com X-Emacs-PR-Message: report 1475 X-Emacs-PR-Package: emacs X-Emacs-PR-Keywords: Original-Received: via spool by submit@emacsbugs.donarmstrong.com id=B.122825892428380 (code B ref -1); Tue, 02 Dec 2008 23:10:03 +0000 Original-Received: (at submit) by emacsbugs.donarmstrong.com; 2 Dec 2008 23:02:04 +0000 Original-Received: from lists.gnu.org (lists.gnu.org [199.232.76.165]) by rzlab.ucr.edu (8.13.8/8.13.8/Debian-3) with ESMTP id mB2N21Uw028366 for ; Tue, 2 Dec 2008 15:02:02 -0800 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1L7eFl-0001AT-5s for bug-gnu-emacs@gnu.org; Tue, 02 Dec 2008 18:02:01 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1L7eFj-0001AH-Mz for bug-gnu-emacs@gnu.org; Tue, 02 Dec 2008 18:02:00 -0500 Original-Received: from [199.232.76.173] (port=47500 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1L7eFj-0001AE-KN for bug-gnu-emacs@gnu.org; Tue, 02 Dec 2008 18:01:59 -0500 Original-Received: from mail-qy0-f17.google.com ([209.85.221.17]:59130) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1L7eFj-0005IZ-3w for bug-gnu-emacs@gnu.org; Tue, 02 Dec 2008 18:01:59 -0500 Original-Received: by qyk10 with SMTP id 10so5706983qyk.18 for ; Tue, 02 Dec 2008 15:01:57 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=gamma; h=domainkey-signature:received:received:message-id:date:from:to :subject:mime-version:content-type:content-transfer-encoding :content-disposition; bh=i3SAEa0q7zPaFa6QDMBmiPNdsckoSSPjt64ksYmLivw=; b=cNXXjGIfyTh0O0mGw6yyGQKbOUoTaTdM1J9zyeLwr+P9sKFSjMaAu6jK2ep9NYOARC cyXvJO/DSp1+9kOO1fxgxJ3E8b6CKdjKcIFBsEdcZMOn8kVBEQv3/VgiMQ4up24RG4Fq 5LeFTs3FH8+sojvXoKhe1dAvBKkVt0FgG2yX4= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=gamma; h=message-id:date:from:to:subject:mime-version:content-type :content-transfer-encoding:content-disposition; b=vEjM5n4b53WYYRWgQYta9DmqS/fhz4X+9fVykT/famQJNSOajPEg/trG2XeAgPlS/M oQ/dYHPBEQs3zDK99dZd0PtKmYPUNzL9+uXHseq/wJQ+VlXBMMrtXZkrXGssasT4cAqY 9pdMEwv1vvOhn5trTfivZ6WZi1QMajnenx07g= Original-Received: by 10.214.44.1 with SMTP id r1mr12441123qar.203.1228258917383; Tue, 02 Dec 2008 15:01:57 -0800 (PST) Original-Received: by 10.214.242.12 with HTTP; Tue, 2 Dec 2008 15:01:57 -0800 (PST) Content-Disposition: inline X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6 (newer, 2) X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6 (newer, 3) Resent-Date: Tue, 02 Dec 2008 18:10:18 -0500 X-Mailman-Approved-At: Tue, 02 Dec 2008 18:53:17 -0500 X-BeenThere: bug-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:22866 Archived-At: In other Mac application it is common to be able to combine Shift with Command + Direction shortcuts to select text in that direction. The following is a tiny patch that makes it so you can, for example, Command+Shift+Left to select to the beginning of the line, or Common+Shift+Down to select the rest of the buffer. Brett --- a/mac-key-mode.el 2008-12-02 16:56:30.000000000 -0600 +++ b/mac-key-mode.el 2008-12-02 16:57:04.000000000 -0600 @@ -117,6 +117,10 @@ (define-key map [(alt c)] 'clipboard-kill-ring-save) (define-key map [(alt v)] 'clipboard-yank) (define-key map [(alt a)] 'mark-whole-buffer) + (define-key map [(alt shift left)] 'beginning-of-line-mark) + (define-key map [(alt shift right)] 'end-of-line-mark) + (define-key map [(alt shift up)] 'beginning-of-buffer-mark) + (define-key map [(alt shift down)] 'end-of-buffer-mark) (define-key map [(alt f)] 'isearch-forward) (define-key map [(alt meta f)] 'occur) (define-key map [(alt g)] 'isearch-repeat-forward)