Skip to content

Commit

Permalink
start adding a hall command.
Browse files Browse the repository at this point in the history
  • Loading branch information
Arne Babenhauserheide committed Mar 22, 2016
1 parent 2fe2cc5 commit 3c9b78a
Show file tree
Hide file tree
Showing 2 changed files with 39 additions and 0 deletions.
1 change: 1 addition & 0 deletions Makefile.am
Original file line number Diff line number Diff line change
Expand Up @@ -81,6 +81,7 @@ SOURCES = \
scripts/config.scm \
scripts/create-bundle.scm \
scripts/list-packages.scm \
scripts/hall.scm \
scripts/install.scm \
scripts/reinstall.scm \
scripts/remove.scm \
Expand Down
38 changes: 38 additions & 0 deletions scripts/hall.scm
Original file line number Diff line number Diff line change
@@ -0,0 +1,38 @@
;;; hall.scm --- Dorodango for Guile

;; Copyright (C) 2011 Free Software Foundation, Inc.
;; Copyright (C) 2009, 2010 Andreas Rottmann <a.rottmann@gmx.at>

;; Author: Arne Babenhauserheide <arne_bab@web.de>

;; This program 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.

;; This program 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 this program. If not, see <http://www.gnu.org/licenses/>.

;;; Commentary:

;; This is the command-line interface to dorodango.

;; Plan:
;; default: list people
;; --list-repos --add-repo --delete-repo


;;; Code:

(define-module (scripts hall))

(define %summary "Create your guild hall.")
(define (main . args)
(write "hall")
(write args)
(newline))

0 comments on commit 3c9b78a

Please sign in to comment.