diff options
| author | Glenn Morris | 2018-04-25 14:41:41 -0400 |
|---|---|---|
| committer | Glenn Morris | 2018-04-25 14:41:41 -0400 |
| commit | bb902bf6a5629df9d54a5caf3d9ce2153f1a84c5 (patch) | |
| tree | 1b5339fc3d7579ddac59504ef1637ec1267c432d | |
| parent | 6e65b1e8a9e8d8a7c68ead3016ff0b9265311700 (diff) | |
| download | emacs-bb902bf6a5629df9d54a5caf3d9ce2153f1a84c5.tar.gz emacs-bb902bf6a5629df9d54a5caf3d9ce2153f1a84c5.zip | |
* lisp/progmodes/sql.el (comint-line-beginning-position):
Remove pre-21 fallback definition.
| -rw-r--r-- | lisp/progmodes/sql.el | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el index 4d291c3bde8..64651aff114 100644 --- a/lisp/progmodes/sql.el +++ b/lisp/progmodes/sql.el | |||
| @@ -2715,17 +2715,6 @@ adds a fontification pattern to fontify identifiers ending in | |||
| 2715 | (sql-highlight-product)) | 2715 | (sql-highlight-product)) |
| 2716 | 2716 | ||
| 2717 | 2717 | ||
| 2718 | ;;; Compatibility functions | ||
| 2719 | |||
| 2720 | (if (not (fboundp 'comint-line-beginning-position)) | ||
| 2721 | ;; comint-line-beginning-position is defined in Emacs 21 | ||
| 2722 | (defun comint-line-beginning-position () | ||
| 2723 | "Return the buffer position of the beginning of the line, after any prompt. | ||
| 2724 | The prompt is assumed to be any text at the beginning of the line | ||
| 2725 | matching the regular expression `comint-prompt-regexp', a buffer | ||
| 2726 | local variable." | ||
| 2727 | (save-excursion (comint-bol nil) (point)))) | ||
| 2728 | |||
| 2729 | ;;; SMIE support | 2718 | ;;; SMIE support |
| 2730 | 2719 | ||
| 2731 | ;; Needs a lot more love than I can provide. --Stef | 2720 | ;; Needs a lot more love than I can provide. --Stef |