From: Reuben Thomas <rrt@sc3d.org>
Date: Sun, 4 Dec 2016 01:06:26 +0000 (+0000)
Subject: Remove unused ispell-looking-back
X-Git-Tag: emacs-26.0.90~1108
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a3ca97e7272b55995c6ce972042496ed79b0cf92;p=emacs.git

Remove unused ispell-looking-back

* lisp/textmodes/ispell.el (ispell-looking-back): Remove unused alias.
---

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 14a782d1cec..554905c1c65 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -118,21 +118,6 @@
 ;;  Recursive edits (?C-r or ?R) inside a keyboard text replacement check (?r)
 ;;    can cause misalignment errors.
 
-;; XEmacs does not have looking-back
-(defalias 'ispell-looking-back
-  (if (fboundp 'looking-back) 'looking-back
-    (lambda (regexp &optional limit &rest ignored)
-      "Return non-nil if text before point matches regular expression REGEXP.
-Like `looking-at' except matches before point, and is slower.
-LIMIT if non-nil speeds up the search by specifying a minimum
-starting position, to avoid checking matches that would start
-before LIMIT.
-
-This is a stripped down compatibility function for use when
-full featured `looking-back' function is missing."
-      (save-excursion
-        (re-search-backward (concat "\\(?:" regexp "\\)\\=") limit t)))))
-
 ;;; XEmacs21 does not have `with-no-warnings'. Taken from org mode.
 (defmacro ispell-with-no-warnings (&rest body)
   (cons (if (fboundp 'with-no-warnings) 'with-no-warnings 'progn) body))