From mboxrd@z Thu Jan 1 00:00:00 1970 From: Nicolas Goaziou Subject: Re: [RFC] Could we get rid of Org specific "mark ring" Date: Tue, 30 Jan 2018 22:29:09 +0100 Message-ID: <87po5rxcgq.fsf@nicolasgoaziou.fr> References: <87o9lcntdq.fsf@nicolasgoaziou.fr> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([208.118.235.92]:37136) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1egdTv-0005MX-4F for emacs-orgmode@gnu.org; Tue, 30 Jan 2018 16:31:06 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1egdSq-00004r-Lr for emacs-orgmode@gnu.org; Tue, 30 Jan 2018 16:30:18 -0500 Received: from relay3-d.mail.gandi.net ([217.70.183.195]:51632) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1egdSq-0008So-6S for emacs-orgmode@gnu.org; Tue, 30 Jan 2018 16:29:12 -0500 In-Reply-To: (Samuel Wales's message of "Tue, 30 Jan 2018 13:47:52 -0700") List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: Samuel Wales Cc: Org Mode List Hello, Samuel Wales writes: > On 1/29/18, Nicolas Goaziou wrote: >> So, could we simply remove this part of Org and use Emacs facilities, >> with their standard bindings (C-u C- and C-x C-) and behaviour >> instead? > > org would have to push to both local and global it seems. `push-mark' would take care of this. So Org wouldn't need to. > also this from se could be modified to work for global mark ring -- > every ring in emacs should have both next and prev. i never > understood the point of rings in emacs except to save memory. > > (defun se-unpop-to-mark-command () > "Unpop off mark ring. Does nothing if mark ring is empty." > (interactive) > (when mark-ring > (setq mark-ring (cons (copy-marker (mark-marker)) mark-ring)) > (set-marker (mark-marker) (car (last mark-ring)) (current-buffer)) > (when (null (mark t)) (ding)) > (setq mark-ring (nbutlast mark-ring)) > (goto-char (marker-position (car (last mark-ring)))))) You could suggest it to Emacs developers (i.e., file a bug report.) Regards, -- Nicolas Goaziou