#!@abs_top_builddir@/guile \
--no-auto-compile -e main -s
!#
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2018 Mathieu Lirzin <mthl@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

;; IMPORTANT: We must avoid loading any modules from Guix here,
;; because we need to adjust the guile load paths first.
;; It's okay to import modules from core Guile though.

(define-syntax-rule (push! elt v) (set! v (cons elt v)))

(define (augment-load-paths!)
  ;; Add installed modules to load-path.
  (push! "@guilemoduledir@" %load-path)
  (push! "@guileobjectdir@" %load-compiled-path))

(define* (main #:optional (args (command-line)))
  (unless (getenv "GUIX_UNINSTALLED")
    (augment-load-paths!))

  (let ((guix-main (module-ref (resolve-interface '(guix ui))
                               'guix-main)))
    (bindtextdomain "guix" "@localedir@")
    (bindtextdomain "guix-packages" "@localedir@")
    ;; XXX: It would be more convenient to change it to:
    ;;   (exit (apply guix-main (command-line)))
    ;; but since the 'guix' command is not updated by 'guix pull', we cannot
    ;; really do it now.
    (apply guix-main args)))

;;; Local Variables:
;;; mode: scheme
;;; End:
nge'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=aaafd19bd1e37265de07e246286a6819792c25b4'>root</a>/<a href='/guix/log/gnu?id=aaafd19bd1e37265de07e246286a6819792c25b4'>gnu</a>/<a href='/guix/log/gnu/services?id=aaafd19bd1e37265de07e246286a6819792c25b4'>services</a>/<a href='/guix/log/gnu/services/mcron.scm?id=aaafd19bd1e37265de07e246286a6819792c25b4'>mcron.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/services/mcron.scm?id=aaafd19bd1e37265de07e246286a6819792c25b4&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-08-26 15:30:04 +0200'>2020-08-26</span></td><td><a href='/guix/commit/gnu/services/mcron.scm?id=ef5ddb0e1715328713c2c9edad897f9a27de692f'>services: mcron: Validate jobs even in the presence of #:user.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes a bug in 949672c923b6a3953471c446e0b19f30be335572 whereby jobs
specifying a #:user not available in the build environment would fail
validation.

Reported by Maxim Cournoyer.

* gnu/services/mcron.scm (job-files)[validated-file]: Add "prologue"
file and pass it to 'mcron --schedule'.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-08-26 00:51:56 +0200'>2020-08-26</span></td><td><a href='/guix/commit/gnu/services/mcron.scm?id=949672c923b6a3953471c446e0b19f30be335572'>services: mcron: Validate jobs at build time.</a><span class='msg-avail'>...<span class='msg-tooltip'>That way, run-time errors in the job specs are caught at build time.

* gnu/services/mcron.scm (job-file): Remove.
(job-files): New procedure.
(mcron-shepherd-services): Adjust accordingly.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-01-06 16:31:54 +0100'>2020-01-06</span></td><td><a href='/guix/commit/gnu/services/mcron.scm?id=6a7c4636d4dec47eefa03c95da5a1315bd0e0413'>Adjust module autoloads.</a><span class='msg-avail'>...<span class='msg-tooltip'>In Guile &lt; 2.9.7, autoloading a module would give you access to all its
bindings.  In future versions, autoloading a module gives access only to
the listed bindings, as per #:select (see &lt;https://bugs.gnu.org/38895&gt;).

This commit adjusts autoloads to the new semantics, allowing Guix to be
built with Guile 2.9.7/2.9.8.

* guix/build/download.scm &lt;top level&gt;: Remove call to 'module-autoload!'.
(load-gnutls): New procedure.
(tls-wrap): Call it.
* guix/git.scm &lt;top level&gt;: Remove call to 'module-autoload!'.
(load-git-submodules): New procedure.
(update-submodules): Call it instead of 'resolve-interface'.
* gnu/bootloader/grub.scm: Replace #:autoload with #:use-module.
* gnu/packages.scm: Likewise.
* gnu/packages/ssh.scm: Likewise.
* gnu/packages/tex.scm: Likewise.
* gnu/services/cuirass.scm: Likewise.
* gnu/services/mcron.scm: Likewise.
* guix/lint.scm: Augment list of bindings in #:autoload.
* guix/scripts/build.scm: Likewise.
* guix/scripts/gc.scm: Likewise.
* guix/scripts/pack.scm: Likewise.
* guix/scripts/publish.scm: Likewise.
* guix/scripts/pull.scm: Likewise.
* guix/utils.scm: Remove unnecessary #:autoload clauses; replace one
of them with #:use-module.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-12-08 00:47:26 +0100'>2019-12-08</span></td><td><a href='/guix/commit/gnu/services/mcron.scm?id=e7d45693d979fdb88dc6eed2a67797c4f8c4b420'>services: mcron: Add description.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/mcron.scm (mcron-service-type): Add description.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Robert Vollmert</td></tr>
<tr><td><span title='2019-06-15 18:15:23 +0200'>2019-06-15</span></td><td><a href='/guix/commit/gnu/services/mcron.scm?id=f3d797005374e5333c7596fe86b4a524ab1b9b11'>services: Remove unneeded imports that led to cycles.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://bugs.gnu.org/36207&gt;.
Reported by Jack Hill &lt;jackhill@jackhill.us&gt;.

* gnu/services/admin.scm: Remove unneeded import of (gnu services
base).
* gnu/services/mcron.scm: Likewise.
</span></span></td><td>Ludovic Courtès</td></tr>