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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fd209047da28440867a4423256ee0111cfb1bd30..a1a52362e8c9c8f3b935631e0226de3d1fb256aa 100644 (file)
--- 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 407c5c3dad0043761569863dd684f69612089763..eba70b86f5298a339228dca28a402145e7f5bf69 100644 (file)
--- 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)