1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/ps-bdf.el b/lisp/ps-bdf.el
index 3ab884c34d3..35ba405b8f9 100644
--- a/lisp/ps-bdf.el
+++ b/lisp/ps-bdf.el
@@ -240,7 +240,7 @@ CODE, where N and CODE are in the following relation:
           (goto-char (point-min))
           (search-forward "\nFONT ")
           (if (looking-at "-[^-]*-[^-]*-[^-]*-[^-]*-[^-]*-[^-]*-\\([0-9]+\\)")
-              (setq size (string-to-int (match-string 1)))
+              (setq size (string-to-number (match-string 1)))
             (search-forward "\nSIZE ")
             (setq size (read (current-buffer)))
             ;; The following kludgy code is t avoid bugs of several