Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

(invisible-p): Remove: implemented in C now.

(line-move-invisible-p): Remove obsolete alias.
  • Loading branch information...
commit 13f0affc77ff56a4e4ec962ba4c92ccbf39b33a0 1 parent dd08881
@monnier monnier authored
Showing with 7 additions and 14 deletions.
  1. +7 −4 lisp/ChangeLog
  2. +0 −10 lisp/simple.el
View
11 lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-08-29 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * simple.el (invisible-p): Remove: implemented in C now.
+ (line-move-invisible-p): Remove obsolete alias.
+
2007-08-28 Juri Linkov <juri@jurta.org>
* image-mode.el (image-type): New variable.
@@ -23,12 +28,10 @@
(tramp-do-copy-or-rename-file): New parameter PRESERVE-UID-GID.
Improve fast track.
(tramp-do-copy-or-rename-file-directly): Sync parameter list with
- the other tramp-do-copy-or-rename-file-* functions. Major
- rewrite.
+ the other tramp-do-copy-or-rename-file-* functions. Major rewrite.
(tramp-handle-file-local-copy, tramp-handle-insert-file-contents)
(tramp-handle-write-region): Improve fast track.
- (tramp-handle-file-remote-p): IDENTIFICATION can also be
- 'localname.
+ (tramp-handle-file-remote-p): IDENTIFICATION can also be `localname'.
(tramp-maybe-open-connection): Let `process-adaptive-read-buffering'
be nil.
View
10 lisp/simple.el
@@ -3639,16 +3639,6 @@ Outline mode sets this."
:type 'boolean
:group 'editing-basics)
-(defun invisible-p (pos)
- "Return non-nil if the character after POS is currently invisible."
- (let ((prop
- (get-char-property pos 'invisible)))
- (if (eq buffer-invisibility-spec t)
- prop
- (or (memq prop buffer-invisibility-spec)
- (assq prop buffer-invisibility-spec)))))
-(define-obsolete-function-alias 'line-move-invisible-p 'invisible-p)
-
;; Returns non-nil if partial move was done.
(defun line-move-partial (arg noerror to-end)
(if (< arg 0)
Please sign in to comment.
Something went wrong with that request. Please try again.