aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/net
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/net')
-rw-r--r--lisp/net/tramp-compat.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/net/tramp-compat.el b/lisp/net/tramp-compat.el
index 130e3122df9..f6f2e116eda 100644
--- a/lisp/net/tramp-compat.el
+++ b/lisp/net/tramp-compat.el
@@ -199,6 +199,8 @@
199 (ignore-errors 199 (ignore-errors
200 (tramp-compat-funcall 'font-lock-add-keywords mode keywords how))) 200 (tramp-compat-funcall 'font-lock-add-keywords mode keywords how)))
201 201
202;; FIXME is this really necessary? Eg Emacs has both l-b-p and p-at-b
203;; since at least 21.1.
202(defsubst tramp-compat-line-beginning-position () 204(defsubst tramp-compat-line-beginning-position ()
203 "Return point at beginning of line (compat function). 205 "Return point at beginning of line (compat function).
204Calls `line-beginning-position' or `point-at-bol' if defined, else 206Calls `line-beginning-position' or `point-at-bol' if defined, else
@@ -209,6 +211,8 @@ own implementation."
209 ((fboundp 'point-at-bol) (tramp-compat-funcall 'point-at-bol)) 211 ((fboundp 'point-at-bol) (tramp-compat-funcall 'point-at-bol))
210 (t (save-excursion (beginning-of-line) (point))))) 212 (t (save-excursion (beginning-of-line) (point)))))
211 213
214;; FIXME is this really necessary? Eg Emacs has both l-e-p and p-at-e
215;; since at least 21.1.
212(defsubst tramp-compat-line-end-position () 216(defsubst tramp-compat-line-end-position ()
213 "Return point at end of line (compat function). 217 "Return point at end of line (compat function).
214Calls `line-end-position' or `point-at-eol' if defined, else 218Calls `line-end-position' or `point-at-eol' if defined, else
@@ -529,5 +533,4 @@ EOL-TYPE can be one of `dos', `unix', or `mac'."
529 533
530;;; TODO: 534;;; TODO:
531 535
532;; arch-tag: 0e724b18-6699-4f87-ad96-640b272e5c85
533;;; tramp-compat.el ends here 536;;; tramp-compat.el ends here