diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/ChangeLog | 8 | ||||
| -rw-r--r-- | test/automated/data/package/archive-contents | 4 | ||||
| -rw-r--r-- | test/automated/data/package/multi-file-0.2.3.tar | bin | 20480 -> 20480 bytes | |||
| -rw-r--r-- | test/automated/package-test.el | 6 | ||||
| -rw-r--r-- | test/automated/package-x-test.el | 2 |
5 files changed, 14 insertions, 6 deletions
diff --git a/test/ChangeLog b/test/ChangeLog index 3f115d9e4e8..bf8ecbcb9eb 100644 --- a/test/ChangeLog +++ b/test/ChangeLog | |||
| @@ -1,3 +1,11 @@ | |||
| 1 | 2013-10-01 Dmitry Gutov <dgutov@yandex.ru> | ||
| 2 | |||
| 3 | * automated/package-test.el: Update all cases to use :url instead | ||
| 4 | of :homepage. | ||
| 5 | |||
| 6 | * automated/package-x-test.el | ||
| 7 | (package-x-test--single-archive-entry-1-3): Same. | ||
| 8 | |||
| 1 | 2013-09-29 Dmitry Gutov <dgutov@yandex.ru> | 9 | 2013-09-29 Dmitry Gutov <dgutov@yandex.ru> |
| 2 | 10 | ||
| 3 | * automated/package-test.el (simple-single-desc-1-4): Remove, it | 11 | * automated/package-test.el (simple-single-desc-1-4): Remove, it |
diff --git a/test/automated/data/package/archive-contents b/test/automated/data/package/archive-contents index b26179c0c3b..8d6f3226ae6 100644 --- a/test/automated/data/package/archive-contents +++ b/test/automated/data/package/archive-contents | |||
| @@ -2,11 +2,11 @@ | |||
| 2 | (simple-single . | 2 | (simple-single . |
| 3 | [(1 3) | 3 | [(1 3) |
| 4 | nil "A single-file package with no dependencies" single | 4 | nil "A single-file package with no dependencies" single |
| 5 | ((:homepage . "http://doodles.au"))]) | 5 | ((:url . "http://doodles.au"))]) |
| 6 | (simple-depend . | 6 | (simple-depend . |
| 7 | [(1 0) | 7 | [(1 0) |
| 8 | ((simple-single (1 3))) "A single-file package with a dependency." single]) | 8 | ((simple-single (1 3))) "A single-file package with a dependency." single]) |
| 9 | (multi-file . | 9 | (multi-file . |
| 10 | [(0 2 3) | 10 | [(0 2 3) |
| 11 | nil "Example of a multi-file tar package" tar | 11 | nil "Example of a multi-file tar package" tar |
| 12 | ((:homepage . "http://puddles.li"))])) | 12 | ((:url . "http://puddles.li"))])) |
diff --git a/test/automated/data/package/multi-file-0.2.3.tar b/test/automated/data/package/multi-file-0.2.3.tar index dde331d0e01..2f1c5e93df1 100644 --- a/test/automated/data/package/multi-file-0.2.3.tar +++ b/test/automated/data/package/multi-file-0.2.3.tar | |||
| Binary files differ | |||
diff --git a/test/automated/package-test.el b/test/automated/package-test.el index b5235ee99a9..84f520df9bc 100644 --- a/test/automated/package-test.el +++ b/test/automated/package-test.el | |||
| @@ -48,7 +48,7 @@ | |||
| 48 | :version '(1 3) | 48 | :version '(1 3) |
| 49 | :summary "A single-file package with no dependencies" | 49 | :summary "A single-file package with no dependencies" |
| 50 | :kind 'single | 50 | :kind 'single |
| 51 | :extras '((:homepage . "http://doodles.au"))) | 51 | :extras '((:url . "http://doodles.au"))) |
| 52 | "Expected `package-desc' parsed from simple-single-1.3.el.") | 52 | "Expected `package-desc' parsed from simple-single-1.3.el.") |
| 53 | 53 | ||
| 54 | (defvar simple-depend-desc | 54 | (defvar simple-depend-desc |
| @@ -64,7 +64,7 @@ | |||
| 64 | :version '(0 2 3) | 64 | :version '(0 2 3) |
| 65 | :summary "Example of a multi-file tar package" | 65 | :summary "Example of a multi-file tar package" |
| 66 | :kind 'tar | 66 | :kind 'tar |
| 67 | :extras '((:homepage . "http://puddles.li"))) | 67 | :extras '((:url . "http://puddles.li"))) |
| 68 | "Expected `package-desc' from \"multi-file-0.2.3.tar\".") | 68 | "Expected `package-desc' from \"multi-file-0.2.3.tar\".") |
| 69 | 69 | ||
| 70 | (defvar new-pkg-desc | 70 | (defvar new-pkg-desc |
| @@ -189,7 +189,7 @@ Must called from within a `tar-mode' buffer." | |||
| 189 | (concat "(define-package \"simple-single\" \"1.3\" " | 189 | (concat "(define-package \"simple-single\" \"1.3\" " |
| 190 | "\"A single-file package " | 190 | "\"A single-file package " |
| 191 | "with no dependencies\" 'nil " | 191 | "with no dependencies\" 'nil " |
| 192 | ":homepage \"http://doodles.au\"" | 192 | ":url \"http://doodles.au\"" |
| 193 | ")\n")))) | 193 | ")\n")))) |
| 194 | (should (file-exists-p autoloads-file)) | 194 | (should (file-exists-p autoloads-file)) |
| 195 | (should-not (get-file-buffer autoloads-file))))) | 195 | (should-not (get-file-buffer autoloads-file))))) |
diff --git a/test/automated/package-x-test.el b/test/automated/package-x-test.el index c7b82360dd8..ab90d59c19d 100644 --- a/test/automated/package-x-test.el +++ b/test/automated/package-x-test.el | |||
| @@ -49,7 +49,7 @@ | |||
| 49 | (package-make-ac-desc '(1 3) nil | 49 | (package-make-ac-desc '(1 3) nil |
| 50 | "A single-file package with no dependencies" | 50 | "A single-file package with no dependencies" |
| 51 | 'single | 51 | 'single |
| 52 | '((:homepage . "http://doodles.au")))) | 52 | '((:url . "http://doodles.au")))) |
| 53 | "Expected contents of the archive entry from the \"simple-single\" package.") | 53 | "Expected contents of the archive entry from the \"simple-single\" package.") |
| 54 | 54 | ||
| 55 | (defvar package-x-test--single-archive-entry-1-4 | 55 | (defvar package-x-test--single-archive-entry-1-4 |