branch: elpa/caml
commit 30579658b59c92ef3b2ac8c46d8eb8bb459e38b7
Author: Christophe Troestler <christophe.troest...@umons.ac.be>
Commit: Christophe Troestler <christophe.troest...@umons.ac.be>
Remove caml-string-to-int
string-to-number has been present for a long time.
---
caml-emacs.el | 3 ---
caml-xemacs.el | 4 ----
caml.el | 3 ---
3 files changed, 10 deletions(-)
diff --git a/caml-emacs.el b/caml-emacs.el
index 13f72c4..bad4ff5 100644
--- a/caml-emacs.el
+++ b/caml-emacs.el
@@ -39,7 +39,4 @@
(or (member 'drag modifiers)
(member 'click modifiers)))))
-(defalias 'caml-string-to-int (if (fboundp 'string-to-number)
- 'string-to-number 'string-to-int))
-
(provide 'caml-emacs)
diff --git a/caml-xemacs.el b/caml-xemacs.el
index 110817f..12dc484 100644
--- a/caml-xemacs.el
+++ b/caml-xemacs.el
@@ -50,8 +50,4 @@
(and (button-release-event-p event)
(equal (event-button original) (event-button event))))
-(if (fboundp 'string-to-number)
- (defalias 'caml-string-to-int 'string-to-number)
- (defalias 'caml-string-to-int 'string-to-int))
-
(provide 'caml-xemacs)
diff --git a/caml.el b/caml.el
index 11f365c..7f13174 100644
--- a/caml.el
+++ b/caml.el
@@ -811,9 +811,6 @@ error message produced by ocamlc.")
(defvar caml-error-overlay nil)
(defvar caml-next-error-skip-warnings-flag nil)
-(define-obsolete-function-alias 'caml-string-to-int
- #'string-to-number "Jan 2021")
-
;;itz 04-21-96 somebody didn't get the documentation for next-error
;;right. When the optional argument is a number n, it should move
;;forward n errors, not reparse.
