all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* [PATCH] Remove tar-package-building functions from package-test.el
@ 2013-08-13 22:25 Daniel Hackney
  2013-08-14  0:57 ` Stefan Monnier
  0 siblings, 1 reply; 2+ messages in thread
From: Daniel Hackney @ 2013-08-13 22:25 UTC (permalink / raw)
  To: Emacs development discussions

[-- Attachment #1: Type: text/plain, Size: 226 bytes --]

Since the tar file is included in the repository directly, there is no
need for "package-test.el" to include the functions to build the tar
file. This patch removes those functions, since they are not used.

--
Daniel Hackney

[-- Attachment #2: remove-tar-package-building.diff --]
[-- Type: application/octet-stream, Size: 2917 bytes --]

diff --git a/test/ChangeLog b/test/ChangeLog
index 1d38f2d..6ab53c5 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,8 @@
+2013-08-13  Daniel Hackney  <dan@haxney.org>
+
+	* package-test.el: Remove tar-package-building functions. Tar file
+	used for testing will be included in the repository.
+
 2013-08-13  Fabián Ezequiel Gallina  <fgallina@gnu.org>
 
 	* automated/python-tests.el (python-imenu-create-index-4)
diff --git a/test/automated/package-test.el b/test/automated/package-test.el
index a5f0ebb..7990090 100755
--- a/test/automated/package-test.el
+++ b/test/automated/package-test.el
@@ -85,9 +85,6 @@
   (expand-file-name "archive-contents" package-test-data-dir)
   "Path to a static copy of \"archive-contents\".")
 
-(defvar package-test-built-file-suffixes '(".tar" "/dir" "/*.info")
-  "Remove these files when cleaning up a built package.")
-
 (cl-defmacro with-package-test ((&optional &key file
                                            basedir
                                            install
@@ -142,33 +139,6 @@
     (let ((help-xref-following t))
       ,@body)))
 
-(autoload 'makeinfo-buffer "makeinfo")
-(defvar compilation-in-progress)
-
-(defun package-test-install-texinfo (file)
-  "Install from texinfo FILE.
-
-FILE should be a .texinfo file relative to the current
-`default-directory'"
-  (require 'info)
-  (let* ((full-file (expand-file-name file))
-         (info-file (replace-regexp-in-string "\\.texi\\'" ".info" full-file))
-         (old-info-defn (symbol-function 'Info-revert-find-node)))
-    (require 'info)
-    (setf (symbol-function 'Info-revert-find-node) #'ignore)
-    (with-current-buffer (find-file-literally full-file)
-      (unwind-protect
-          (progn
-            (makeinfo-buffer)
-            ;; Give `makeinfo-buffer' a chance to finish
-            (while compilation-in-progress
-              (sit-for 0.1))
-            (call-process "ginstall-info" nil nil nil
-                          (format "--info-dir=%s" default-directory)
-                          (format "%s" info-file)))
-        (kill-buffer)
-        (setf (symbol-function 'Info-revert-find-node) old-info-defn)))))
-
 (defun package-test-strip-version (dir)
   (replace-regexp-in-string "-pkg\\.el\\'" "" (package--description-file dir)))
 
@@ -178,14 +148,6 @@ FILE should be a .texinfo file relative to the current
    '(lambda (item) (file-expand-wildcards (concat base item)))
    suffix-list))
 
-(defun package-test-cleanup-built-files (dir)
-  "Remove files which were the result of creating a tar archive.
-
-DIR is the base name of the package directory, without the trailing slash"
-  (let* ((pkg-dirname (file-name-nondirectory dir)))
-    (dolist (file (package-test-suffix-matches dir package-test-built-file-suffixes))
-      (delete-file file))))
-
 (defvar tar-parse-info)
 (declare-function tar-header-name "tar-mode" (cl-x) t) ; defstruct
 

^ permalink raw reply related	[flat|nested] 2+ messages in thread

* Re: [PATCH] Remove tar-package-building functions from package-test.el
  2013-08-13 22:25 [PATCH] Remove tar-package-building functions from package-test.el Daniel Hackney
@ 2013-08-14  0:57 ` Stefan Monnier
  0 siblings, 0 replies; 2+ messages in thread
From: Stefan Monnier @ 2013-08-14  0:57 UTC (permalink / raw)
  To: Daniel Hackney; +Cc: Emacs development discussions

> Since the tar file is included in the repository directly, there is no
> need for "package-test.el" to include the functions to build the tar
> file. This patch removes those functions, since they are not used.

Thanks, installed,


        Stefan



^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2013-08-14  0:57 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2013-08-13 22:25 [PATCH] Remove tar-package-building functions from package-test.el Daniel Hackney
2013-08-14  0:57 ` Stefan Monnier

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.