From: Stefan Kangas <stefankangas@gmail.com>
Date: Sun, 30 Oct 2022 20:26:45 +0000 (+0100)
Subject: ; Delete duplicate definition from simula.el
X-Git-Tag: emacs-29.0.90~1616^2~372
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e6881f2e153bdaafa7522614347155d7ab655351;p=emacs.git

; Delete duplicate definition from simula.el

* lisp/progmodes/simula.el (simula-mode-menu): Delete duplicate
menu definition.
---

diff --git a/lisp/progmodes/simula.el b/lisp/progmodes/simula.el
index 7e9aeab8fee..a1794d3f70d 100644
--- a/lisp/progmodes/simula.el
+++ b/lisp/progmodes/simula.el
@@ -1,7 +1,6 @@
 ;;; simula.el --- SIMULA 87 code editing commands for Emacs  -*- lexical-binding: t; -*-
 
-;; Copyright (C) 1992, 1994, 1996, 2001-2022 Free Software Foundation,
-;; Inc.
+;; Copyright (C) 1992-2022 Free Software Foundation, Inc.
 
 ;; Author: Hans Henrik Eriksen <hhe@ifi.uio.no>
 ;; Maintainer: emacs-devel@gnu.org
@@ -246,17 +245,6 @@ for SIMULA mode to function correctly."
 (defvar simula-font-lock-keywords simula-font-lock-keywords-1
   "Default expressions to highlight in Simula mode.")
 
-; The following function is taken from cc-mode.el,
-; it determines the flavor of the Emacs running
-
-(defvar simula-mode-menu
-  '(["Indent Line"	      simula-indent-line t]
-    ["Backward Statement"     simula-previous-statement t]
-    ["Forward Statement"      simula-next-statement t]
-    ["Backward Up Level"      simula-backward-up-level t]
-    ["Forward Down Statement" simula-forward-down-level t])
-  "Emacs menu for SIMULA mode.")
-
 (defvar simula-mode-map
   (let ((map (make-sparse-keymap)))
     (define-key map "\C-c\C-u"   #'simula-backward-up-level)
@@ -1560,7 +1548,6 @@ If not nil and not t, move to limit of search and return nil."
 (let (abbrevs-changed)
   (simula-install-standard-abbrevs))
 
-;; Hilit mode support.
 
 ;; obsolete