diff options
| -rw-r--r-- | .gitignore | 1 | ||||
| -rwxr-xr-x | scripts/guix-data-service-process-branch-updated-email | 34 |
2 files changed, 1 insertions, 34 deletions
@@ -12,4 +12,5 @@ guix-data-service/config.scm scripts/guix-data-service scripts/guix-data-service-process-jobs scripts/guix-data-service-query-build-servers +scripts/guix-data-service-process-branch-updated-email pre-inst-env diff --git a/scripts/guix-data-service-process-branch-updated-email b/scripts/guix-data-service-process-branch-updated-email deleted file mode 100755 index 1762a4a..0000000 --- a/scripts/guix-data-service-process-branch-updated-email +++ /dev/null @@ -1,34 +0,0 @@ -#!/gnu/store/njwvn85rrkplkxk6gy5d7v1n0358a91i-profile/bin/guile --no-auto-compile --*- scheme -*- --*- geiser-scheme-implementation: guile -*- -!# -;;; Guix Data Service -- Information about Guix over time -;;; Copyright © 2019 Christopher Baines <mail@cbaines.net> -;;; -;;; This file is part of guix-data-service. -;;; -;;; guix-data-service 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. -;;; -;;; guix-data-service 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 the guix-data-service. If not, see <http://www.gnu.org/licenses/>. - -(use-modules (srfi srfi-1) - (srfi srfi-37) - (ice-9 textual-ports) - (squee) - (email email) - (guix-data-service branch-updated-emails)) - -(let ((conn (connect-to-postgres-paramstring "dbname=guix_data_service"))) - (enqueue-job-for-email - conn - (parse-email - (get-string-all (current-input-port))))) |