From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Boruch Baum Newsgroups: gmane.emacs.devel Subject: Tab advance for tabulated-list-mode [CODE ATTACHED] Date: Sun, 17 Jan 2021 02:17:59 -0500 Message-ID: <20210117071759.ge3gqdnucoc7jrm2@E15-2016.optimum.net> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: quoted-printable Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="12186"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: NeoMutt/20180716 To: Emacs-Devel List Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Sun Jan 17 08:19:27 2021 Return-path: Envelope-to: ged-emacs-devel@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1l12LN-00030j-I5 for ged-emacs-devel@m.gmane-mx.org; Sun, 17 Jan 2021 08:19:25 +0100 Original-Received: from localhost ([::1]:51272 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1l12LM-0006Fh-Jj for ged-emacs-devel@m.gmane-mx.org; Sun, 17 Jan 2021 02:19:24 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:37108) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1l12K9-0005pF-5V for emacs-devel@gnu.org; Sun, 17 Jan 2021 02:18:09 -0500 Original-Received: from mout.gmx.net ([212.227.17.22]:51145) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1l12K7-0001Bg-Dj for emacs-devel@gnu.org; Sun, 17 Jan 2021 02:18:08 -0500 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=gmx.net; s=badeba3b8450; t=1610867882; bh=Pn6x8bkRRfEiHmADxRhjuA4yXKpB7f3dhpcEe/Vw2Hs=; h=X-UI-Sender-Class:Date:From:To:Subject; b=LN8hxW+MkwmgIru+pgwCvC3PeXdOPN8LGynAwhCEtBW4KVrFnt6u7xC2c/2ZcFobG VZgMUxaOG2KjAA4ogtWrEId4EUmHDXJ19k926DwqJp1+uBGqqUZ10SCHWBOqlf5Hnh lnHXtZIQjtcCNcMK35Dx/B0CWL7iH6e83X6/JN5Q= X-UI-Sender-Class: 01bb95c1-4bf8-414a-932a-4f6e2808ef9c Original-Received: from E15-2016.optimum.net ([70.19.86.82]) by mail.gmx.com (mrgmx105 [212.227.17.174]) with ESMTPSA (Nemesis) id 1MPXhK-1lMR5s0YWA-00MedF for ; Sun, 17 Jan 2021 08:18:02 +0100 Content-Disposition: inline X-Provags-ID: V03:K1:YkucK22vwTNgfwiXDP0CLOsnRB4M867ZUDLTzYUWhkTVNuKCZ81 VZEbPigEwGruZxe436tvWGNjoBkk73JWjzicKeCqQWaa3n1V+9Oh+Z4pEcwvq3rod7DsUAT P3X/8T142sXu5jbBoGHV3JtCcFDnwhrNKgEzw9/45tuX8WU/iTBWzyoJCy95W0HE6yZ6RKJ WXPDsJxV2AhkskTSxyqdA== X-UI-Out-Filterresults: notjunk:1;V03:K0:Mr0ByZ6rnMs=:3Thz5ROFFpsITJf1sLBmeB wgvLjjYB1XkJt3lcmsNngC3ZMB3CAJntbKyvRk3GRTNQ0hVIyW2yjDfbvDJfm7awt26UDXKHH 9oOrhDjKz++xMFftJlJ/5fQZnyqOlXSjalXfuSuPhhbYEDVvkD2oXuLEUBEdhvH+0q7wBslHe 7qvJ3YFyJMJOfAwu5bFVNiiaDfxpugh7kcyGIJtHgCofmW7CHSQl5jNSYVHo+GAbVHHqtVNrk HSQ3HeErEx2cMt+dXZrfPnW+WtJKKvoJlBBe9Mi13uCk0jKf0fJ3WR6vzU1UAOn7vPjkNS3it SUfqrjjcCSLvfLu+QAF5qLEsfgL7WxH/EF4yq1kpEAdsgo07rSHoWjl5li7oXx4G7BAwKwrPU /E9T4XUaQA0GWqXGj4ClNkGgE5F9OZfV9kxX11DZbzRLMTkXHRiVlIalfYFBptm4zmsmOITEI Bqy1SrYp+0/DrRIeRGAIF8rAi8nUgrwXPJDJf/1pESeReEEvfqfritxeFuV+H106d0SbJS7uH TF+W7MfUlqOzoAYXjOOU3adb0aetnDWue0IfWt+G8vTDDVowtI0nKBLNv9PSHNDdRKD9qoMZ0 b+8ejPid2YdyFEl/pvDJnw8Zn4KuPnC2mc25wMiblTdcA+WlFjGhLnJRLreHeYm3AJVZ81HRP aPzqx2I9dV1qZbK70X/ykKk8zf+UKuI8XJFogx9JjPriC4q6qEcCToQdlsRtySgixUG9MD0uO UTGRARnVi8MoA2B0VowQp6yzERmlJVLdswvD5kR4clxZ7QZ/hcOeKN8jamZL6QlZnnTBqurN Received-SPF: pass client-ip=212.227.17.22; envelope-from=boruch_baum@gmx.com; helo=mout.gmx.net X-Spam_score_int: -18 X-Spam_score: -1.9 X-Spam_bar: - X-Spam_report: (-1.9 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_NONE=-0.0001, RCVD_IN_MSPIKE_H3=0.001, RCVD_IN_MSPIKE_WL=0.001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Original-Sender: "Emacs-devel" Xref: news.gmane.io gmane.emacs.devel:263114 Archived-At: Tabulated-list-mode provides for sorting by column at POINT, but not for navigating by column to quickly get to the column one wishes to sort. The following code provides that feature. (defun tabulated-list-tab-backward (&optional n) "Navigated N column entries backward in tabulated listing. Default is to advance one column." (interactive "p") (crossword-summary-tab-forward (- n))) (defun tabulated-list-tab-forward (&optional n) "Navigate N column entries forward in tabulated listing. Default is to advance one column." (interactive "p") (let* ((direction (if (< 0 n) 'next-single-property-change (setq n (- n)) 'previous-single-property-change)) (pos (point)) N) (dotimes (N n) (if (not pos) (setq N n) (while (and (setq pos (funcall direction pos 'tabulated-list-column= -name)) (not (get-text-property pos 'tabulated-list-entry)))))) (goto-char (or pos (if (eq direction 'next-property-change) (point-max) (point-min)))))) (define-key tabulated-list-mode-map "\t" 'tabulated-list-tab-= forward) (define-key tabulated-list-mode-map (kbd "") 'tabulated-list-tab-= backward) =2D- hkp://keys.gnupg.net CA45 09B5 5351 7C11 A9D1 7286 0036 9E45 1595 8BC0