;;; 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.
"*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))