From e6881f2e153bdaafa7522614347155d7ab655351 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Sun, 30 Oct 2022 21:26:45 +0100 Subject: [PATCH] ; Delete duplicate definition from simula.el * lisp/progmodes/simula.el (simula-mode-menu): Delete duplicate menu definition. --- lisp/progmodes/simula.el | 15 +-------------- 1 file changed, 1 insertion(+), 14 deletions(-) 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 ;; 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 -- 2.39.2