1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/calc/calc-yank.el b/lisp/calc/calc-yank.el
index c15724ccde7..84c117a1723 100644
--- a/lisp/calc/calc-yank.el
+++ b/lisp/calc/calc-yank.el
@@ -1,6 +1,6 @@
 ;;; calc-yank.el --- kill-ring functionality for Calc
 
-;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
+;; Copyright (C) 1990, 1991, 1992, 1993, 2001, 2005 Free Software Foundation, Inc.
 
 ;; Author: David Gillespie <daveg@synaptics.com>
 ;; Maintainer: Jay Belanger <belanger@truman.edu>
@@ -231,7 +231,7 @@
                         pos j)))))
         (if (string-match "\\` *-?[0-9][0-9]?[0-9]?[0-9]?[0-9]?[0-9]? *\\'"
                           (car data))
-            (setq vals (list 'vec (string-to-int (car data))))
+            (setq vals (list 'vec (string-to-number (car data))))
           (if (and (null arg)
                    (string-match "[[{][^][{}]*[]}]" (car data)))
               (setq pos (match-beginning 0)