From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Tino Calancha Newsgroups: gmane.emacs.bugs Subject: bug#32421: 26.1.50; Ibuffer: Add toggle ibuffer-do-toggle-lock Date: Sun, 12 Aug 2018 01:49:47 +0900 Message-ID: <87zhxslufo.fsf@calancha-pc.dy.bbexcite.jp> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: blaine.gmane.org 1534006147 2152 195.159.176.226 (11 Aug 2018 16:49:07 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Sat, 11 Aug 2018 16:49:07 +0000 (UTC) To: 32421@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sat Aug 11 18:49:03 2018 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1foX4Z-0000OQ-4d for geb-bug-gnu-emacs@m.gmane.org; Sat, 11 Aug 2018 18:49:03 +0200 Original-Received: from localhost ([::1]:60831 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1foX6e-0001e5-07 for geb-bug-gnu-emacs@m.gmane.org; Sat, 11 Aug 2018 12:51:12 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:40938) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1foX6X-0001dp-Ac for bug-gnu-emacs@gnu.org; Sat, 11 Aug 2018 12:51:06 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1foX6U-0003my-8o for bug-gnu-emacs@gnu.org; Sat, 11 Aug 2018 12:51:05 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:43316) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1foX6U-0003mt-3y for bug-gnu-emacs@gnu.org; Sat, 11 Aug 2018 12:51:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1foX6T-000429-UR for bug-gnu-emacs@gnu.org; Sat, 11 Aug 2018 12:51:01 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Tino Calancha Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 11 Aug 2018 16:51:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 32421 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.153400620515426 (code B ref -1); Sat, 11 Aug 2018 16:51:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 11 Aug 2018 16:50:05 +0000 Original-Received: from localhost ([127.0.0.1]:48334 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1foX5Y-00040g-61 for submit@debbugs.gnu.org; Sat, 11 Aug 2018 12:50:04 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:49851) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1foX5V-000405-JR for submit@debbugs.gnu.org; Sat, 11 Aug 2018 12:50:02 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1foX5P-0003Fn-6Q for submit@debbugs.gnu.org; Sat, 11 Aug 2018 12:49:56 -0400 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:46467) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1foX5P-0003Fh-2z for submit@debbugs.gnu.org; Sat, 11 Aug 2018 12:49:55 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:40818) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1foX5N-00016W-OV for bug-gnu-emacs@gnu.org; Sat, 11 Aug 2018 12:49:54 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1foX5K-0003DT-HF for bug-gnu-emacs@gnu.org; Sat, 11 Aug 2018 12:49:53 -0400 Original-Received: from mail-wm0-x233.google.com ([2a00:1450:400c:c09::233]:38135) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1foX5K-0003D9-9X for bug-gnu-emacs@gnu.org; Sat, 11 Aug 2018 12:49:50 -0400 Original-Received: by mail-wm0-x233.google.com with SMTP id t25-v6so4775415wmi.3 for ; Sat, 11 Aug 2018 09:49:50 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=from:to:subject:date:message-id:mime-version; bh=AUmJ/0HZLo7sZ+TfT9Hj+vnfRDSwFPcKyA+2mPZvpfc=; b=igLMLOHSahvrEZCwtahO5tetm2AVaAw3OU/UyOljGj1dXN3l/HmUYy4NmCBKz28/SB scogKx8Y3tGNYBMoLzKKfcIhqvM6iIKznOrk+EkLZ0+AH0OsVagEDASMP9k/vRMvv+jl FmGT7yjgoCuqKShFZ8xmVKD79oSMqs6aB54Dz8xLqh7L/vB3bFZ2sny2hi7N0tP1Icvd sBre5vYtjJeKxZf6tw2vOHtFOPIBpTw7LQqbRM9wx0BvY3ot5iOLoPwHOrmEb6APodPp iW3AEmox9dloNeZ37MRl0QVW7QymZkyymBmwp3JtAdqYOVv6zELrCb8JLZ4yBxNkpzl7 5n3g== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:to:subject:date:message-id:mime-version; bh=AUmJ/0HZLo7sZ+TfT9Hj+vnfRDSwFPcKyA+2mPZvpfc=; b=LIwCdaPvXWjexiHWhS6tYTfwCCy3DHgiAcB48a5rKNOMfp0RSncI1H3rXCFjTrT0v+ 2A/9x++0O+6cYC1zYykhS0+07gauXx2SPV+LNi18AuDC/kToDZBniWrGcyf4CgQEh7OB yo7nvMP7qYNrhOlxXswqbdf1RLwx8K0h/g0GKJoofQGwzCz2TM8XzozK28pJRdoYGK+A Bc/T0cWbrkVA8tbee9bD4TIX5w6rmMroH6M10GF5irPRppPaUJH5nPRRShxTp1tUKB0x HckAxOsoJaIrMbz2xm5MaRc6x73xoqdeOzBLrZEeMGOFjhQbeLX8vgwedEVlbt6TJcNh Hgnw== X-Gm-Message-State: AOUpUlGWpzw1iaoWrCi11EQJ9J0BteGZHW/bEVFhg40YRGAn7sugMC3u uue/gq220di8NXmpsucrIOfSQUpQ X-Google-Smtp-Source: AA+uWPzTKN3A/71grPqlxvlXei+rn15X4A7L2lOdWI16oIeije5pk4QxEVBtJVbBww7s4wp9P/5AYw== X-Received: by 2002:a1c:9e89:: with SMTP id h131-v6mr4026324wme.13.1534006188894; Sat, 11 Aug 2018 09:49:48 -0700 (PDT) Original-Received: from calancha-pc.dy.bbexcite.jp (63.red-81-37-214.dynamicip.rima-tde.net. [81.37.214.63]) by smtp.gmail.com with ESMTPSA id h7-v6sm12693840wrs.8.2018.08.11.09.49.48 for (version=TLS1_2 cipher=ECDHE-RSA-CHACHA20-POLY1305 bits=256/256); Sat, 11 Aug 2018 09:49:48 -0700 (PDT) X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.org gmane.emacs.bugs:149442 Archived-At: Severity: wishlist Ibuffer reports locked buffers in its 3rd column. A toggle for this might be convenient. --8<-----------------------------cut here---------------start------------->8--- commit c939fc542675d648d42c66d59b781fa2ab703897 Author: Tino Calancha Date: Sun Aug 12 01:37:05 2018 +0900 Ibuffer: Add toggle ibuffer-do-toggle-lock Toggle the locked status in marked buffers or the buffer at point (Bug#32421). * lisp/ibuffer.el (ibuffer-do-toggle-lock): New command. (ibuffer-mode-map): Bind it to 'L'. (ibuffer-mode-operate-map): Add entries for `ibuffer-do-toggle-read-only' and `ibuffer-do-toggle-lock'. * etc/NEWS (Changes in Specialized Modes and Packages in Emacs 26.2): Announce the change. diff --git a/etc/NEWS b/etc/NEWS index a1c12a6766..6d432d857e 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -45,6 +45,11 @@ often cause crashes. Set it to nil if you really need those fonts. * Changes in Specialized Modes and Packages in Emacs 26.2 +** Ibuffer + +--- +*** New toggle 'ibuffer-do-toggle-lock'. + ** Gnus --- diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el index 0a7bfe00a9..8bf089017b 100644 --- a/lisp/ibuffer.el +++ b/lisp/ibuffer.el @@ -590,6 +590,7 @@ ibuffer-mode-map (define-key map (kbd "R") 'ibuffer-do-rename-uniquely) (define-key map (kbd "S") 'ibuffer-do-save) (define-key map (kbd "T") 'ibuffer-do-toggle-read-only) + (define-key map (kbd "L") 'ibuffer-do-toggle-lock) (define-key map (kbd "r") 'ibuffer-do-replace-regexp) (define-key map (kbd "V") 'ibuffer-do-revert) (define-key map (kbd "W") 'ibuffer-do-view-and-eval) @@ -862,6 +863,10 @@ ibuffer-mode-operate-map '(menu-item "Print" ibuffer-do-print)) (define-key-after operate-map [do-toggle-modified] '(menu-item "Toggle modification flag" ibuffer-do-toggle-modified)) + (define-key-after operate-map [do-toggle-read-only] + '(menu-item "Toggle read-only flag" ibuffer-do-toggle-read-only)) + (define-key-after operate-map [do-toggle-lock] + '(menu-item "Toggle lock flag" ibuffer-do-toggle-lock)) (define-key-after operate-map [do-revert] '(menu-item "Revert" ibuffer-do-revert :help "Revert marked buffers to their associated file")) @@ -1361,6 +1366,16 @@ ibuffer-do-toggle-read-only :modifier-p t) (read-only-mode (if (integerp arg) arg 'toggle))) +(define-ibuffer-op ibuffer-do-toggle-lock (&optional arg) + "Toggle locked status in marked buffers. +If optional ARG is a non-negative integer, lock buffers. +If ARG is a negative integer or 0, unlock buffers. +Otherwise, toggle lock status." + (:opstring "toggled lock status in" + :interactive "P" + :modifier-p t) + (emacs-lock-mode (if (integerp arg) arg 'toggle))) + (define-ibuffer-op ibuffer-do-delete () "Kill marked buffers as with `kill-this-buffer'." (:opstring "killed" @@ -2514,6 +2529,7 @@ ibuffer-mode `\\[ibuffer-do-view-other-frame]' - View the marked buffers in another frame. `\\[ibuffer-do-revert]' - Revert the marked buffers. `\\[ibuffer-do-toggle-read-only]' - Toggle read-only state of marked buffers. + `\\[ibuffer-do-toggle-lock]' - Toggle lock state of marked buffers. `\\[ibuffer-do-delete]' - Kill the marked buffers. `\\[ibuffer-do-isearch]' - Do incremental search in the marked buffers. `\\[ibuffer-do-isearch-regexp]' - Isearch for regexp in the marked buffers. --8<-----------------------------cut here---------------end--------------->8--- In GNU Emacs 26.1.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.22.11) of 2018-08-11 Repository revision: ec6f588940e51013435408a456c10d33ddf98fb2 Windowing system distributor 'The X.Org Foundation', version 11.0.11902000 System Description: Debian GNU/Linux 9.5 (stretch)