From d694ccd7e57d75902aa1b466040453ddd9f0d63d Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Mon, 11 Apr 2005 15:23:20 +0000 Subject: [PATCH] (f90-electric-insert): Add optional prefix arg, and pass to self-insert-command. --- lisp/progmodes/f90.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el index 4c8b847b7cd..14363e4dccf 100644 --- a/lisp/progmodes/f90.el +++ b/lisp/progmodes/f90.el @@ -1055,10 +1055,10 @@ block[ \t]*data\\)\\>") (f90-change-keywords f90-auto-keyword-case (line-beginning-position) (line-end-position)))) -(defun f90-electric-insert () +(defun f90-electric-insert (&optional arg) "Change keyword case and auto-fill line as operators are inserted." - (interactive) - (self-insert-command 1) + (interactive "*p") + (self-insert-command arg) (if auto-fill-function (f90-do-auto-fill) ; also updates line (f90-update-line))) -- 2.39.5