From 902dd5e2250891e71ae0ce9a3f4b1304366a60c3 Mon Sep 17 00:00:00 2001
From: David Aspinall
Date: Fri, 7 May 2004 00:09:56 +0000
Subject: Fix for GNU Emacs

---
 plastic/plastic.el | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

(limited to 'plastic')

diff --git a/plastic/plastic.el b/plastic/plastic.el
index c334cf53..f08e7146 100644
--- a/plastic/plastic.el
+++ b/plastic/plastic.el
@@ -660,13 +660,14 @@ We assume that module identifiers coincide with file names."
 
 ;; pcc macros etc
 ;; da: I've moved these key defs out of plastic-mode-config
-
-(define-key plastic-keymap ?s 'plastic-small-bar)
-(define-key plastic-keymap ?l 'plastic-large-bar)
-(define-key plastic-keymap ?c 'plastic-all-ctxt)
-(define-key plastic-keymap ?v 'plastic-minibuf)
-(define-key plastic-keymap ?o 'plastic-synchro)
-(define-key plastic-keymap ?p 'plastic-show-shell)
+;; da: PG 3.5.1: fixed for GNU Emacs compatible syntax
+
+(define-key plastic-keymap [(control s)] 'plastic-small-bar)
+(define-key plastic-keymap [(control l)] 'plastic-large-bar)
+(define-key plastic-keymap [(control c)] 'plastic-all-ctxt)
+(define-key plastic-keymap [(control v)] 'plastic-minibuf)
+(define-key plastic-keymap [(control o)] 'plastic-synchro)
+(define-key plastic-keymap [(control p)] 'plastic-show-shell)
 
 
 ;; original end.
-- 
cgit v1.2.3