Index: emacs/lisp/hexl.el
diff -c emacs/lisp/hexl.el:1.92 emacs/lisp/hexl.el:1.93
*** emacs/lisp/hexl.el:1.92     Tue Apr 26 11:02:15 2005
--- emacs/lisp/hexl.el  Mon May 16 11:33:46 2005
***************
*** 874,880 ****
  (defun hexl-insert-decimal-char (arg)
    "Insert a character given by its decimal code ARG times at point."
    (interactive "p")
!   (let ((num (string-to-int (read-string "Decimal Number: "))))
      (if (< num 0)
        (error "Decimal number out of range")
        (hexl-insert-multibyte-char num arg))))
--- 874,880 ----
  (defun hexl-insert-decimal-char (arg)
    "Insert a character given by its decimal code ARG times at point."
    (interactive "p")
!   (let ((num (string-to-number (read-string "Decimal Number: "))))
      (if (< num 0)
        (error "Decimal number out of range")
        (hexl-insert-multibyte-char num arg))))


_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs

Reply via email to