From e70cccc0c8884cb28f14a3e9bdd442f22f3959e5 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Sun, 12 Jan 2003 20:51:36 +0000 Subject: [PATCH] (picture-substitute): Use command remapping instead of substitute-key-definition. --- lisp/textmodes/picture.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/picture.el b/lisp/textmodes/picture.el index 031341e75e0..08357632177 100644 --- a/lisp/textmodes/picture.el +++ b/lisp/textmodes/picture.el @@ -1,6 +1,6 @@ ;;; picture.el --- "Picture mode" -- editing using quarter-plane screen model -;; Copyright (C) 1985, 1994, 2002 Free Software Foundation, Inc. +;; Copyright (C) 1985, 1994, 2002, 2003 Free Software Foundation, Inc. ;; Author: K. Shane Hartman ;; Maintainer: FSF @@ -590,7 +590,7 @@ Leaves the region surrounding the rectangle." (defvar picture-mode-map nil) (defun picture-substitute (oldfun newfun) - (substitute-key-definition oldfun newfun picture-mode-map global-map)) + (define-key picture-mode-map (vector 'remap oldfun) newfun)) (if (not picture-mode-map) (progn -- 2.39.2