Commit Diff


commit - 8cd9fb9c30ee2eada5e20d378d0c63f3d0254aef
commit + b9f2f63410c767f1790f67690686c59430585cf6
blob - 125a38efc303eed0611b0ca237cc9d26febee990
blob + 32d3e757cb14457c53c9c165d8942dd23182d838
--- a68-mode.el
+++ a68-mode.el
@@ -64,7 +64,6 @@
   (let ((map (make-sparse-keymap)))
     (define-key map (kbd "C-j") #'newline-and-indent)
     (define-key map (kbd "RET") #'a68-electric-terminate-line)
-    (define-key map (kbd "C-i") #'a68-electric-tab)
     map)
   "Keymap for Algol 68 major mode.")
 
@@ -215,14 +214,6 @@
   (unless (a68-within-string)
     (a68-indent-line)))
 
-(defun a68-electric-tab ()
-  "Function called when TAB is pressed in Algol68 mode."
-  (interactive)
-  (unless (save-excursion
-            (beginning-of-line)
-            (a68-within-string))
-    (a68-indent-line)))
-
 (defvar a68-mode-abbrev-table nil
   "Abbreviation table used in `a68-mode' buffers.")