From 355cddd5dce166cd15998d81e5e6dece96db2858 Mon Sep 17 00:00:00 2001 From: David Aspinall Date: Sat, 23 Sep 2000 16:47:42 +0000 Subject: Add Pierre's tweak --- lego/x-symbol-lego.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'lego') diff --git a/lego/x-symbol-lego.el b/lego/x-symbol-lego.el index bcc25a50..531810fa 100644 --- a/lego/x-symbol-lego.el +++ b/lego/x-symbol-lego.el @@ -57,7 +57,9 @@ (defvar x-symbol-lego-electric-ignore nil) (defvar x-symbol-lego-required-fonts nil) (defvar x-symbol-lego-case-insensitive nil) -(defvar x-symbol-lego-token-shape nil) +;; Setting token shape prevents "philosophy" example, but still +;; problems, e.g. delphi, false1. (Pierre) +(defvar x-symbol-lego-token-shape '(?_ "[A-Za-z]+" . "[A-Za-z_]")) (defvar x-symbol-lego-table x-symbol-lego-symbol-table) (defun x-symbol-lego-default-token-list (tokens) tokens) (defvar x-symbol-lego-token-list 'x-symbol-lego-default-token-list) -- cgit v1.2.3