Synch to No Gnus 200507290604.
[elisp/gnus.git-] / lisp / gnus-offline.el
index 0e1655a..6cd037c 100644 (file)
 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 ;;; GNU General Public License for more details.
 
-;;; You should have received a copy of the GNU General Public License
-;;; along with GNU Emacs; see the file COPYING.  If not, write to the
-;;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;;; Boston, MA 02111-1307, USA.
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 ;;;
 ;;;; Commentary:
 ;;; Note.
@@ -798,10 +798,10 @@ Please check your .emacs or .gnus.el to work nnspool fine.")
   "*Set interval time for gnus-daemon."
   (interactive)
   (setq gnus-offline-interval-time
-       (string-to-int (read-from-minibuffer
-                       (format (gnus-offline-gettext 'interval-time-1)
-                               gnus-offline-interval-time)
-                       nil)))
+       (string-to-number (read-from-minibuffer
+                          (format (gnus-offline-gettext 'interval-time-1)
+                                  gnus-offline-interval-time)
+                          nil)))
   (if (< gnus-offline-interval-time 2)
       (progn
        (message "%s" (gnus-offline-gettext 'interval-time-2))