Mercurial > emacs
changeset 47356:c4da69acaa79
(syntax-after): Delete. Moved to subr.el.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 09 Sep 2002 23:14:13 +0000 |
| parents | 9e3ee43b5262 |
| children | 97c0efea1010 |
| files | lisp/emacs-lisp/syntax.el |
| diffstat | 1 files changed, 0 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/syntax.el Mon Sep 09 23:13:18 2002 +0000 +++ b/lisp/emacs-lisp/syntax.el Mon Sep 09 23:14:13 2002 +0000 @@ -282,13 +282,5 @@ ;; (with-current-buffer (or buffer (current-buffer)) ;; (syntax-ppss-depth (syntax-ppss)))) -(defun syntax-after (pos) - "Return the syntax of the char after POS." - (unless (or (< pos (point-min)) (>= pos (point-max))) - (let ((st (if parse-sexp-lookup-properties - (get-char-property pos 'syntax-table)))) - (if (consp st) st - (aref (or st (syntax-table)) (char-after pos)))))) - (provide 'syntax) ;;; syntax.el ends here