[elpa] externals/auctex 4617caa 26/67: Remove compatibility code for older emacsen

[Tassilo Horn]

branch: externals/auctex
commit 4617caac744644d8536c2f2ed1c4e028ab943d3b
Author: Ikumi Keita <address@hidden>
Commit: Ikumi Keita <address@hidden>

    Remove compatibility code for older emacsen
    
    * latex.el (LaTeX-fill-region-as-para-do): Drop fallback for case
    `fill-delete-prefix' isn't available.
---
 latex.el | 17 ++---------------
 1 file changed, 2 insertions(+), 15 deletions(-)

diff --git a/latex.el b/latex.el
index 2b4749b..0165242 100644
--- a/latex.el
+++ b/latex.el
@@ -3776,21 +3776,8 @@ space does not end a sentence, so don't break a line 
there."
          (remove-text-properties from to '(hard nil)))
        ;; Make sure first line is indented (at least) to left margin...
        (indent-according-to-mode)
-       ;; COMPATIBILITY for Emacs <= 21.1
-       (if (fboundp 'fill-delete-prefix)
-           ;; Delete the fill-prefix from every line.
-           (fill-delete-prefix from to fill-prefix)
-         ;; Delete the comment prefix and any whitespace from every
-         ;; line of the region in concern except the first. (The
-         ;; implementation is heuristic to a certain degree.)
-         (save-excursion
-           (goto-char from)
-           (forward-line 1)
-           (when (< (point) to)
-             (while (re-search-forward (concat "^[ \t]+\\|^[ \t]*"
-                                               TeX-comment-start-regexp
-                                               "+[ \t]*") to t)
-               (delete-region (match-beginning 0) (match-end 0))))))
+       ;; Delete the fill-prefix from every line.
+       (fill-delete-prefix from to fill-prefix)
 
        (setq from (point))