Disable git owner validation

Evgeny PisemskyMon Aug 19 14:15:30+0300 2024

0aaa59b

Disable git owner validation

scripts/gitile.in

33
!#
44
55
;;;; Copyright (C) 2020 Julien Lepiller <julien@lepiller.eu>
6+
;;;; Copyright (C) 2024 Evgeny Pisemsky <mail@pisemsky.site>
67
;;;;
78
;;;; SPDX-License-Identifier: AGPL-3.0-or-later
89
;;;;

2021
;;;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
2122
;;;;
2223
23-
(use-modules (fibers web server))
24-
(use-modules (ice-9 match))
25-
(use-modules (gitile config) (gitile handler))
24+
(use-modules (ice-9 match)
25+
             (fibers web server)
26+
             (git settings)
27+
             (gitile config)
28+
             (gitile handler))
2629
2730
(define* (main #:optional (args (command-line)))
2831
  (let ((config

3841
                 (make-config port host database repositories git-base-url index-title
3942
                              intro footer)))))
4043
           (_ (format #t "Usage: ~a [-c config-file]~%" (car args))))))
44+
    (set-owner-validation! #f)
4145
    (run-server (gitile-handler config)
4246
                #:port (config-port config))))
47+
48+
;; Local Variables:
49+
;; mode: scheme
50+
;; End: