Skip to content

Commit de020bc

Browse files
committed
Add HOME variable in propriety test cases.
Correct test failures on 24.4 and 24.5 Emacs versions.
1 parent 70bbce9 commit de020bc

File tree

1 file changed

+6
-4
lines changed

1 file changed

+6
-4
lines changed

test/pythonic-test.el

Lines changed: 6 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -308,17 +308,19 @@ remote host."
308308

309309
(ert-deftest test-start-pythonic-path-property ()
310310
"Set `python-shell-exec-path' as `path' process property."
311-
(let ((python-shell-exec-path '("test"))
312-
(process-environment '("PATH=/usr/bin")))
311+
(let* ((home (f-expand "~"))
312+
(python-shell-exec-path '("test"))
313+
(process-environment (list "PATH=/usr/bin" (concat "HOME" "=" home))))
313314
(should (equal "test:/usr/bin"
314315
(process-get
315316
(start-pythonic :process "out" :args '("-V"))
316317
'path)))))
317318

318319
(ert-deftest test-start-pythonic-pythonpath-property ()
319320
"Set `python-shell-extra-pythonpaths' as `pythonpath' process property."
320-
(let ((python-shell-extra-pythonpaths '("test"))
321-
(process-environment '("PYTHONPATH=/home/me")))
321+
(let* ((home (f-expand "~"))
322+
(python-shell-extra-pythonpaths '("test"))
323+
(process-environment (list "PYTHONPATH=/home/me" (concat "HOME" "=" home))))
322324
(should (equal "test:/home/me"
323325
(process-get
324326
(start-pythonic :process "out" :args '("-V"))

0 commit comments

Comments
 (0)