emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] trunk r117416: * test/automated/package-x-test.el: Do not


From: Glenn Morris
Subject: [Emacs-diffs] trunk r117416: * test/automated/package-x-test.el: Do not mess with load-path.
Date: Thu, 26 Jun 2014 07:34:20 +0000
User-agent: Bazaar (2.6b2)

------------------------------------------------------------
revno: 117416
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Thu 2014-06-26 00:34:09 -0700
message:
  * test/automated/package-x-test.el: Do not mess with load-path.
modified:
  test/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-8588
  test/automated/package-x-test.el 
packagextest.el-20130627091657-y6z4ce9fzk0b3j1j-1
=== modified file 'test/ChangeLog'
--- a/test/ChangeLog    2014-06-26 07:32:16 +0000
+++ b/test/ChangeLog    2014-06-26 07:34:09 +0000
@@ -1,5 +1,7 @@
 2014-06-26  Glenn Morris  <address@hidden>
 
+       * automated/package-x-test.el: Do not mess with load-path.
+
        * automated/Makefile.in (%.log): If error, dump log to stdout.
 
 2014-06-26  Stefan Monnier  <address@hidden>

=== modified file 'test/automated/package-x-test.el'
--- a/test/automated/package-x-test.el  2014-01-01 07:43:34 +0000
+++ b/test/automated/package-x-test.el  2014-06-26 07:34:09 +0000
@@ -22,27 +22,12 @@
 
 ;;; Commentary:
 
-;; You may want to run this from a separate Emacs instance from your
-;; main one, because a bug in the code below could mess with your
-;; installed packages.
-
-;; Run this in a clean Emacs session using:
-;;
-;;     $ emacs -Q --batch -L . -l package-x-test.el -f 
ert-run-tests-batch-and-exit
-
 ;;; Code:
 
 (require 'package-x)
 (require 'ert)
 (require 'cl-lib)
-(eval-when-compile (require 'package-test))
-
-;; package-test is not normally in `load-path', so temporarily set
-;; `load-path' to contain the current directory.
-(let ((load-path (append (list (file-name-directory (or load-file-name
-                                                        buffer-file-name)))
-                         load-path)))
-  (require 'package-test))
+(require 'package-test)
 
 (defvar package-x-test--single-archive-entry-1-3
   (cons 'simple-single


reply via email to

[Prev in Thread] Current Thread [Next in Thread]