[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp ChangeLog paren.el simple.el subr.el
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] emacs/lisp ChangeLog paren.el simple.el subr.el |
Date: |
Thu, 19 Mar 2009 14:45:08 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Juanma Barranquero <lektu> 09/03/19 14:45:07
Modified files:
lisp : ChangeLog paren.el simple.el subr.el
Log message:
* subr.el (forward-point): Add obsolescence declaration.
* paren.el (show-paren-function):
* simple.el (kill-forward-chars, kill-backward-chars):
Use (+/- (point) N), instead of `forward-point'.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15502&r2=1.15503
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/paren.el?cvsroot=emacs&r1=1.79&r2=1.80
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/simple.el?cvsroot=emacs&r1=1.976&r2=1.977
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/subr.el?cvsroot=emacs&r1=1.634&r2=1.635
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15502
retrieving revision 1.15503
diff -u -b -r1.15502 -r1.15503
--- ChangeLog 19 Mar 2009 09:35:58 -0000 1.15502
+++ ChangeLog 19 Mar 2009 14:45:02 -0000 1.15503
@@ -1,3 +1,11 @@
+2009-03-19 Juanma Barranquero <address@hidden>
+
+ * subr.el (forward-point): Add obsolescence declaration.
+
+ * paren.el (show-paren-function):
+ * simple.el (kill-forward-chars, kill-backward-chars):
+ Use (+/- (point) N), instead of `forward-point'.
+
2009-03-19 Glenn Morris <address@hidden>
* mail/rmail.el (rmail-retry-ignored-headers): Add :version tag.
Index: paren.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/paren.el,v
retrieving revision 1.79
retrieving revision 1.80
diff -u -b -r1.79 -r1.80
--- paren.el 5 Jan 2009 03:19:37 -0000 1.79
+++ paren.el 19 Mar 2009 14:45:05 -0000 1.80
@@ -212,9 +212,9 @@
(delete-overlay show-paren-overlay-1))
(let ((from (if (= dir 1)
(point)
- (forward-point -1)))
+ (- (point) 1)))
(to (if (= dir 1)
- (forward-point 1)
+ (+ (point) 1)
(point))))
(if show-paren-overlay-1
(move-overlay show-paren-overlay-1 from to (current-buffer))
@@ -238,7 +238,7 @@
pos
(save-excursion
(goto-char pos)
- (forward-point (- dir))))))
+ (- (point) dir)))))
(if show-paren-overlay
(move-overlay show-paren-overlay from to (current-buffer))
(setq show-paren-overlay (make-overlay from to nil t))))
Index: simple.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/simple.el,v
retrieving revision 1.976
retrieving revision 1.977
diff -u -b -r1.976 -r1.977
--- simple.el 14 Mar 2009 17:43:16 -0000 1.976
+++ simple.el 19 Mar 2009 14:45:05 -0000 1.977
@@ -3103,13 +3103,13 @@
(defun kill-forward-chars (arg)
(if (listp arg) (setq arg (car arg)))
(if (eq arg '-) (setq arg -1))
- (kill-region (point) (forward-point arg)))
+ (kill-region (point) (+ (point) arg)))
;; Internal subroutine of backward-delete-char
(defun kill-backward-chars (arg)
(if (listp arg) (setq arg (car arg)))
(if (eq arg '-) (setq arg -1))
- (kill-region (point) (forward-point (- arg))))
+ (kill-region (point) (- (point) arg)))
(defcustom backward-delete-char-untabify-method 'untabify
"The method for untabifying when deleting backward.
Index: subr.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/subr.el,v
retrieving revision 1.634
retrieving revision 1.635
diff -u -b -r1.634 -r1.635
--- subr.el 14 Feb 2009 09:06:56 -0000 1.634
+++ subr.el 19 Mar 2009 14:45:06 -0000 1.635
@@ -998,6 +998,7 @@
(define-obsolete-function-alias 'string-to-int 'string-to-number "22.1")
(make-obsolete 'char-bytes "now always returns 1." "20.4")
+(make-obsolete 'forward-point "use (+ (point) N) instead." "23.1")
(defun insert-string (&rest args)
"Mocklisp-compatibility insert function.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp ChangeLog paren.el simple.el subr.el,
Juanma Barranquero <=