From f56cd1335ce17bd2e871ca33e4d6d4c37cd949ff Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 20 Jan 2007 15:43:48 +0000 Subject: (last-sexp-toggle-display): Fixed cursor position when toggle abbreviated display. --- lisp/emacs-lisp/lisp-mode.el | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lisp/emacs-lisp/lisp-mode.el') diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index a58ecb256ac..3a501ea85c1 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -490,6 +490,8 @@ alternative printed representations that can be displayed." (point (point))) (delete-region beg end) (insert (nth 1 value)) + (or (= beg point) + (setq point (1- (point)))) (last-sexp-setup-props beg (point) (nth 0 value) (nth 2 value) -- cgit v1.2.1 From f0fa15c5e512e4b6fd2f7bd65ea6cfbb8f960942 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sun, 21 Jan 2007 02:48:43 +0000 Subject: Add 2007 to copyright years. --- lisp/emacs-lisp/lisp-mode.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/emacs-lisp/lisp-mode.el') diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 3a501ea85c1..5aa656bd2b5 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -1,7 +1,7 @@ ;;; lisp-mode.el --- Lisp mode, and its idiosyncratic commands ;; Copyright (C) 1985, 1986, 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006 Free Software Foundation, Inc. +;; 2005, 2006, 2007 Free Software Foundation, Inc. ;; Maintainer: FSF ;; Keywords: lisp, languages -- cgit v1.2.1