* lisp/emacs-lisp/package.el (package-load-descriptor): Do not call

`emacs-lisp-mode', just use its syntax table.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b64bcccacd1357e3e17b8e7dd30f9786ad567d59..64745559126ed45b524caf57da8f5eba0611cefb 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-06-17  Dmitry Gutov  <dgutov@yandex.ru>
+
+       * emacs-lisp/package.el (package-load-descriptor): Do not call
+       `emacs-lisp-mode', just use its syntax table.
+
 2013-06-17  Juanma Barranquero  <lekktu@gmail.com>
 
        * progmodes/prog-mode.el (prog-prettify-install): Add `composition' to

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 2db422a4d1224d226d9ad5790ef0cd0b82a6409f..cd7852af55074730ae62e13ed12364afd693fe6e 100644 (file)
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -419,11 +419,11 @@ This is, approximately, the inverse of `version-to-list'.
     (when (file-exists-p pkg-file)
       (with-temp-buffer
         (insert-file-contents pkg-file)
-        (emacs-lisp-mode)
         (goto-char (point-min))
-        (let ((pkg-desc (package-process-define-package
-                         (read (current-buffer)) pkg-file)))
-          (setf (package-desc-dir pkg-desc) pkg-dir))))))
+        (with-syntax-table emacs-lisp-mode-syntax-table
+          (let ((pkg-desc (package-process-define-package
+                           (read (current-buffer)) pkg-file)))
+            (setf (package-desc-dir pkg-desc) pkg-dir)))))))
 
 (defun package-load-all-descriptors ()
   "Load descriptors for installed Emacs Lisp packages.