[Emacs-diffs] Changes to emacs/lisp/subr.el

[Pavel Janík]

Index: emacs/lisp/subr.el
diff -c emacs/lisp/subr.el:1.280 emacs/lisp/subr.el:1.281
*** emacs/lisp/subr.el:1.280    Sun Dec 16 13:36:34 2001
--- emacs/lisp/subr.el  Sat Dec 22 08:36:12 2001
***************
*** 652,657 ****
--- 652,666 ----
  (make-obsolete 'sref 'aref "20.4")
  (make-obsolete 'char-bytes "Now this function always returns 1" "20.4")
  
+ (defun insert-string (&rest args)
+   "Mocklisp-compatibility insert function.
+ Like the function `insert' except that any argument that is a number
+ is converted into a string by expressing it in decimal."
+   (dolist (el args)
+     (insert (if (integerp el) (number-to-string el) el))))
+ 
+ (make-obsolete 'insert-string 'insert "21.3")
+ 
  ;; Some programs still use this as a function.
  (defun baud-rate ()
    "Obsolete function returning the value of the `baud-rate' variable.