(perl-mode-abbrev-table): Restore definition.

2 files changed, 8 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fd209047da2..a1a52362e8c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2002-01-22  Richard M. Stallman  <rms@gnu.org>
+
+        * progmodes/perl-mode.el (perl-mode-abbrev-table): Restore definition.
+
 2002-01-21  Richard M. Stallman  <rms@gnu.org>
 
         * emacs-lisp/copyright.el (copyright-regexp): Fix previous change.
diff --git a/lisp/progmodes/perl-mode.el b/lisp/progmodes/perl-mode.el
index 407c5c3dad0..eba70b86f52 100644
--- a/lisp/progmodes/perl-mode.el
+++ b/lisp/progmodes/perl-mode.el
@@ -105,6 +105,10 @@
   :prefix "perl-"
   :group 'languages)
 
+(defvar perl-mode-abbrev-table nil
+  "Abbrev table in use in perl-mode buffers.")
+(define-abbrev-table 'perl-mode-abbrev-table ())
+
 (defvar perl-mode-map
   (let ((map (make-sparse-keymap)))
     (define-key map "{" 'perl-electric-terminator)