From mboxrd@z Thu Jan 1 00:00:00 1970 From: Samuel Wales Subject: Re: [RFC] Could we get rid of Org specific "mark ring" Date: Tue, 30 Jan 2018 13:47:52 -0700 Message-ID: References: <87o9lcntdq.fsf@nicolasgoaziou.fr> Mime-Version: 1.0 Content-Type: text/plain; charset="UTF-8" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:60554) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1egcpo-0003nN-BI for emacs-orgmode@gnu.org; Tue, 30 Jan 2018 15:49:58 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1egcot-0004SQ-En for emacs-orgmode@gnu.org; Tue, 30 Jan 2018 15:48:52 -0500 Received: from mail-io0-x236.google.com ([2607:f8b0:4001:c06::236]:44494) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1egcos-0004Qh-Vc for emacs-orgmode@gnu.org; Tue, 30 Jan 2018 15:47:55 -0500 Received: by mail-io0-x236.google.com with SMTP id z6so12942975iob.11 for ; Tue, 30 Jan 2018 12:47:54 -0800 (PST) In-Reply-To: <87o9lcntdq.fsf@nicolasgoaziou.fr> 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: Nicolas Goaziou Cc: Org Mode List 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. sounds good to me. === note also that for single buffers there is marker-visit.el. 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))))))