diff options
| author | Markus Rost | 2002-10-15 05:15:40 +0000 |
|---|---|---|
| committer | Markus Rost | 2002-10-15 05:15:40 +0000 |
| commit | e170d16cb0166ea636bb06f22e57f57bff66101f (patch) | |
| tree | d2ae4240da3afa492725cddd059311640580802c /admin/cus-test.el | |
| parent | a80d729082f3020956b6e260f8edd9f93c1a6551 (diff) | |
| download | emacs-e170d16cb0166ea636bb06f22e57f57bff66101f.tar.gz emacs-e170d16cb0166ea636bb06f22e57f57bff66101f.zip | |
(cus-test-libs): Use equal instead of =.
Diffstat (limited to 'admin/cus-test.el')
| -rw-r--r-- | admin/cus-test.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/admin/cus-test.el b/admin/cus-test.el index f6062c9f7f0..8885b097873 100644 --- a/admin/cus-test.el +++ b/admin/cus-test.el | |||
| @@ -109,6 +109,7 @@ | |||
| 109 | ;; (ada-xref error 255) | 109 | ;; (ada-xref error 255) |
| 110 | ;; (ada-stmt error 255) | 110 | ;; (ada-stmt error 255) |
| 111 | 111 | ||
| 112 | |||
| 112 | ;;; Code: | 113 | ;;; Code: |
| 113 | 114 | ||
| 114 | ;;; Workarounds. For a smooth run and to avoid some side effects. | 115 | ;;; Workarounds. For a smooth run and to avoid some side effects. |
| @@ -458,7 +459,7 @@ in the emacs source directory." | |||
| 458 | (setq cmd (concat "src/emacs -batch -l " fn)) | 459 | (setq cmd (concat "src/emacs -batch -l " fn)) |
| 459 | (setq status (call-process shell-file-name nil nil nil | 460 | (setq status (call-process shell-file-name nil nil nil |
| 460 | shell-command-switch cmd)) | 461 | shell-command-switch cmd)) |
| 461 | (if (= status 0) | 462 | (if (equal status 0) |
| 462 | (message "%s" file) | 463 | (message "%s" file) |
| 463 | (error "%s" status)) | 464 | (error "%s" status)) |
| 464 | (push file cus-test-libs-loaded)) | 465 | (push file cus-test-libs-loaded)) |