From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:35916) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dT3rL-0005aK-Dc for guix-patches@gnu.org; Thu, 06 Jul 2017 06:18:10 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dT3rG-0001HA-CS for guix-patches@gnu.org; Thu, 06 Jul 2017 06:18:07 -0400 Received: from debbugs.gnu.org ([208.118.235.43]:51550) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1dT3rG-0001Gy-8g for guix-patches@gnu.org; Thu, 06 Jul 2017 06:18:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1dT3rG-0005ty-0w for guix-patches@gnu.org; Thu, 06 Jul 2017 06:18:02 -0400 Subject: [bug#27596] [PATCH] guix: lint: Add checker for new upstream versions. Resent-Message-ID: Received: from eggs.gnu.org ([2001:4830:134:3::10]:35745) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dT3r0-0005Kw-Ly for guix-patches@gnu.org; Thu, 06 Jul 2017 06:17:47 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dT3qv-0001AB-LT for guix-patches@gnu.org; Thu, 06 Jul 2017 06:17:46 -0400 Received: from flashner.co.il ([178.62.234.194]:58196) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dT3qv-00019e-Do for guix-patches@gnu.org; Thu, 06 Jul 2017 06:17:41 -0400 Received: from localhost (85.64.232.168.dynamic.barak-online.net [85.64.232.168]) by flashner.co.il (Postfix) with ESMTPSA id B843F4024A for ; Thu, 6 Jul 2017 10:17:39 +0000 (UTC) From: Efraim Flashner Date: Thu, 6 Jul 2017 13:17:23 +0300 Message-Id: <20170706101723.3349-1-efraim@flashner.co.il> MIME-Version: 1.0 Content-Transfer-Encoding: quoted-printable List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: 27596@debbugs.gnu.org * guix/scripts/lint.scm (check-for-updates): New procedure. (%checkers): Add it. --- guix/scripts/lint.scm | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/guix/scripts/lint.scm b/guix/scripts/lint.scm index 04ab85299..665db158c 100644 --- a/guix/scripts/lint.scm +++ b/guix/scripts/lint.scm @@ -35,6 +35,7 @@ #:use-module (guix utils) #:use-module (guix memoization) #:use-module (guix scripts) + #:use-module (guix scripts refresh) #:use-module (guix gnu-maintenance) #:use-module (guix monads) #:use-module (guix cve) @@ -72,6 +73,7 @@ check-mirror-url check-license check-vulnerabilities + check-for-updates check-formatting run-checkers =20 @@ -821,6 +823,10 @@ from ~s: ~a (~s)~%") (string-join (map vulnerability-id unpa= tched) ", "))))))))) =20 +(define (check-for-updates package) + "Check if there is an update available for PACKAGE." + (guix-refresh (package-name package))) + =0C ;;; ;;; Source code formatting. @@ -972,6 +978,10 @@ or a list thereof") (CVE) database") (check check-vulnerabilities)) (lint-checker + (name 'refresh) + (description "Check the package for new upstream releases") + (check check-for-updates)) + (lint-checker (name 'formatting) (description "Look for formatting issues in the source") (check check-formatting)))) --=20 2.13.2