🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: gnu.emacs.bug
Article #930

quoted-insert inserts in overwrite-mode

#930
From: d90-awe
Date: Thu, 07 Jan 1993 15:32
38 lines
1883 bytes
"GNU Emacs 18.59.17 of Sun Nov 22 1992 on baki.nada.kth.se (berkeley-unix)"

The function self-insert-command inserts unless in overwrite-mode,
then it overwrites. But quoted-insert always inserts. It should
overwrite if in overwrite-mode.

Patch:
*** /tmp/simple.el      Thu Jan  7 14:17:58 1993
--- /src/packages/gnu/emacs-18.59/lisp/simple.el        Wed Apr 15 10:13:32 1992
***************
*** 43,54 ****
  (defun quoted-insert (arg)
    "Read next input character and insert it.
  Useful for inserting control characters.
  You may also type up to 3 octal digits, to insert a character with that code"
    (interactive "*p")
!   (let ((last-command-char (read-quoted-char)))
!     (self-insert-command arg)))
  
  (defun delete-indentation (&optional arg)
    "Join this line to previous and fix up whitespace at join.
  With argument, join this line to following line."
    (interactive "*P")
--- 43,56 ----
  (defun quoted-insert (arg)
    "Read next input character and insert it.
  Useful for inserting control characters.
  You may also type up to 3 octal digits, to insert a character with that code"
    (interactive "*p")
!   (let ((char (read-quoted-char)))
!     (while (> arg 0)
!       (insert char)
!       (setq arg (1- arg)))))
  
  (defun delete-indentation (&optional arg)
    "Join this line to previous and fix up whitespace at join.
  With argument, join this line to following line."
    (interactive "*P")
Technical Details
Message-ID: <9301071332.AA00861@monicaz.nada.kth.se>
Path: arc1-ca.pugleaf.net!sparky!uunet!zaphod.mps.ohio-state.edu!cis.ohio-state.edu!nada.kth.se!d90-awe

Show Full Headers
Complete Article Headers
Newsgroups: gnu.emacs.bug
Path: arc1-ca.pugleaf.net!sparky!uunet!zaphod.mps.ohio-state.edu!cis.ohio-state.edu!nada.kth.se!d90-awe
From: d90-awe@nada.kth.se
Subject: quoted-insert inserts in overwrite-mode
Message-ID: <9301071332.AA00861@monicaz.nada.kth.se>
Sender: gnulists@ai.mit.edu
Organization: GNUs Not Usenet
Distribution: gnu
Date: Thu, 7 Jan 1993 15:32:23 GMT
Approved: bug-gnu-emacs@prep.ai.mit.edu
Lines: 39