[elpa] 169/299: * preview.el (preview-lispdir): New defvar. * auto.el.in (preview-lispdir): Set it to @address@hidden

[Stefan Monnier]

monnier pushed a commit to branch externals/auctex
in repository elpa.

commit 2380b1206c923842ab7c14dda02f40698c3f943c
Author: Tassilo Horn <address@hidden>
Date:   Thu Sep 5 17:12:18 2013 +0200

    * preview.el (preview-lispdir): New defvar.
    * auto.el.in (preview-lispdir): Set it to @address@hidden
---
 preview/ChangeLog  |    6 ++++++
 preview/auto.el.in |    3 ++-
 preview/preview.el |    3 +++
 3 files changed, 11 insertions(+), 1 deletions(-)

diff --git a/preview/ChangeLog b/preview/ChangeLog
index 285d7a4..e443453 100644
--- a/preview/ChangeLog
+++ b/preview/ChangeLog
@@ -1,3 +1,9 @@
+2013-09-05  Tassilo Horn  <address@hidden>
+
+       * preview.el (preview-lispdir): New defvar.
+
+       * auto.el.in (preview-lispdir): Set it to @address@hidden
+
 2013-07-03  Tassilo Horn  <address@hidden>
 
        * preview.el (preview-gs-command): Change test for `mgs'
diff --git a/preview/auto.el.in b/preview/auto.el.in
index d85dfca..de23bec 100644
--- a/preview/auto.el.in
+++ b/preview/auto.el.in
@@ -1,4 +1,5 @@
 @lispGS@
-(add-to-list 'load-path @lisppackagelispdir@)
+(defvar preview-lispdir @lisppackagelispdir@)
+(add-to-list 'load-path preview-lispdir)
 (defvar preview-datadir @lisppackagedatadir@)
 @lisppackagetexstyles@
diff --git a/preview/preview.el b/preview/preview.el
index 538ded3..7b5aef6 100644
--- a/preview/preview.el
+++ b/preview/preview.el
@@ -1440,6 +1440,9 @@ autoloads for preview-latex.")
                                                            preview-datadir))
                 ,@(preview-filter-specs-1 args))))
 
+(defvar preview-lispdir TeX-lisp-directory
+  "The directory where the preview lisp files are located.")
+
 (defun preview-ascent-from-bb (bb)
   "This calculates the image ascent from its bounding box.
 The bounding box BB needs to be a 4-component vector of