From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:58973) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1f2J8n-0004AG-EU for guix-patches@gnu.org; Sat, 31 Mar 2018 12:14:06 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1f2J8k-0004ea-95 for guix-patches@gnu.org; Sat, 31 Mar 2018 12:14:05 -0400 Received: from debbugs.gnu.org ([208.118.235.43]:53491) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1f2J8k-0004eS-4M for guix-patches@gnu.org; Sat, 31 Mar 2018 12:14:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1f2J8j-0005SB-Um for guix-patches@gnu.org; Sat, 31 Mar 2018 12:14:01 -0400 Subject: [bug#30991] [PATCH v2 1/3] services: Move static-networking to (gnu services base). Resent-Message-ID: From: ludo@gnu.org (Ludovic =?UTF-8?Q?Court=C3=A8s?=) References: <20180329222140.21590-1-dannym@scratchpost.org> <20180329222140.21590-2-dannym@scratchpost.org> Date: Sat, 31 Mar 2018 18:13:33 +0200 In-Reply-To: <20180329222140.21590-2-dannym@scratchpost.org> (Danny Milosavljevic's message of "Fri, 30 Mar 2018 00:21:38 +0200") Message-ID: <87y3i8jk9e.fsf@gnu.org> MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 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: Danny Milosavljevic Cc: 30991@debbugs.gnu.org Danny Milosavljevic skribis: > * gnu/services/networking.scm (static-networking, static-networking?, > static-networking-interface, static-networking-ip, static-networking-netm= ask, > static-networking-gateway, static-networking-requirement, > static-networking-service, static-networking-service-type): Move to... > * gnu/services/base.scm: ...here. What=E2=80=99s the reason? Is there a module cross-dependency issue or something? > + (stop #~(lambda _ > + ;; Return #f is successfully stopped. > + (let ((sock (socket AF_INET SOCK_STREAM 0))) > + (when #$gateway > + (delete-network-route sock > + (make-socket-address > + AF_INET INADDR_ANY 0))) > + (set-network-interface-flags sock #$interface 0) > + (close-port sock) > +: #f))) ^ A cat walked on the keyboard. :-) Ludo=E2=80=99.