guile-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Getting started with tekuti


From: Neil Jerram
Subject: Getting started with tekuti
Date: Thu, 6 Apr 2017 22:52:32 +0100
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:45.0) Gecko/20100101 Thunderbird/45.8.0

Hey Andy,

I'm just trying to get started with tekuti, but am hitting problems which look like they're associated with having no content yet. I've appended a transcript below - can you see what's wrong?

Thanks - Neil


address@hidden:~/SW/tekuti$ ./env src/tekuti
;;; note: source file /home/neil/SW/tekuti/tekuti/git.scm
;;;       newer than compiled /home/neil/SW/tekuti/tekuti/git.go
;;; found fresh local cache at /home/neil/.cache/guile/ccache/2.2-LE-8-3.9/home/neil/SW/tekuti/tekuti/git.scm.go
;;; note: source file /home/neil/SW/tekuti/tekuti/util.scm
;;;       newer than compiled /home/neil/SW/tekuti/tekuti/util.go
;;; found fresh local cache at /home/neil/.cache/guile/ccache/2.2-LE-8-3.9/home/neil/SW/tekuti/tekuti/util.scm.go
;;; note: source file /home/neil/SW/tekuti/tekuti/web.scm
;;;       newer than compiled /home/neil/SW/tekuti/tekuti/web.go
;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;;       or pass the --no-auto-compile argument to disable.
;;; compiling /home/neil/SW/tekuti/tekuti/web.scm
;;; note: source file /home/neil/SW/tekuti/tekuti/post.scm
;;;       newer than compiled /home/neil/SW/tekuti/tekuti/post.go
;;; found fresh local cache at /home/neil/.cache/guile/ccache/2.2-LE-8-3.9/home/neil/SW/tekuti/tekuti/post.scm.go ;;; compiled /home/neil/.cache/guile/ccache/2.2-LE-8-3.9/home/neil/SW/tekuti/tekuti/web.scm.go

;;; (reading-index)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "rev-parse" "refs/heads/index"))
fatal: ambiguous argument 'refs/heads/index': unknown revision or path not in the working tree.
Use '--' to separate paths from revisions, like this:
'git <command> [<revision>...] -- [<file>...]'

;;; (start-clock)

;;; (start-clock)

;;; (posts)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (stop-clock 0.005752)

;;; (start-clock)

;;; (posts-by-date)

;;; (stop-clock 4.4999999999999996e-5)

;;; (start-clock)

;;; (tags)

;;; (latest-posts ((posts-by-date) (posts . #<hash-table 563b0667eba0 0/31>) (master . "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd")))

;;; (filter-mapn ())

;;; (stop-clock 1.75e-4)

;;; (start-clock)

;;; (legit-comments)

;;; (computing-legit)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (done #<hash-table 563b0667ea40 0/31>)

;;; (stop-clock 0.0056549999999999994)

;;; (start-clock)

;;; (bogus-comments)

;;; (computing-bogus)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "cat-file" "commit" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd"))

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "rev-parse" #f))
In tekuti/index.scm:
   113:28 10 (_)
In tekuti/util.scm:
187:5 9 (with-time-debugging* #<procedure 563b06776740 at tekuti/index.s…>)
In srfi/srfi-1.scm:
466:18 8 (fold #<procedure 563b06776700 at tekuti/index.scm:55:9 (spec i…> …)
In tekuti/index.scm:
58:25 7 (_ _ ((legit-comments . #<hash-table 563b0667ea40 0/31>) (. #) …))
In tekuti/util.scm:
187:5 6 (with-time-debugging* #<procedure 563b06777de0 at tekuti/index.s…>)
In tekuti/comment.scm:
    206:2  5 (compute-bogus-comments _ _)
In tekuti/git.scm:
339:16 4 (fold-commits #<procedure 563b06777db0 at tekuti/comment.scm:20…> …)
   174:24  3 (git-rev-parse #f)
    92:15  2 (run _ _ _)
In ice-9/popen.scm:
    64:22  1 (open-pipe* "r" _ . _)
In unknown file:
           0 (open-process "r" "git" "--bare" "rev-parse" #f)
ERROR: Wrong type (expecting string): #f

;;; (stop-clock 0.05782799999999999)

;;; (stop-clock 0.06981599999999999)

;;; (handler ())

;;; (start-clock)

;;; (start-clock)

;;; (posts)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (stop-clock 0.026757)

;;; (start-clock)

;;; (posts-by-date)

;;; (stop-clock 3.6e-5)

;;; (start-clock)

;;; (tags)

;;; (latest-posts ((posts-by-date) (posts . #<hash-table 563b064787a0 0/31>) (master . "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd")))

;;; (filter-mapn ())

;;; (stop-clock 3.59e-4)

;;; (start-clock)

;;; (legit-comments)

;;; (computing-legit)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (done #<hash-table 563b06478640 0/31>)

;;; (stop-clock 0.006625)

;;; (start-clock)

;;; (bogus-comments)

;;; (computing-bogus)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "cat-file" "commit" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd"))

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "rev-parse" #f))
In tekuti/index.scm:
   113:28 10 (_)
In tekuti/util.scm:
187:5 9 (with-time-debugging* #<procedure 563b0642fc20 at tekuti/index.s…>)
In srfi/srfi-1.scm:
466:18 8 (fold #<procedure 563b0642fbe0 at tekuti/index.scm:55:9 (spec i…> …)
In tekuti/index.scm:
58:25 7 (_ _ ((legit-comments . #<hash-table 563b06478640 0/31>) (. #) …))
In tekuti/util.scm:
187:5 6 (with-time-debugging* #<procedure 563b0667fcc0 at tekuti/index.s…>)
In tekuti/comment.scm:
    206:2  5 (compute-bogus-comments _ _)
In tekuti/git.scm:
339:16 4 (fold-commits #<procedure 563b0667fc90 at tekuti/comment.scm:20…> …)
   174:24  3 (git-rev-parse #f)
    92:15  2 (run _ _ _)
In ice-9/popen.scm:
    64:22  1 (open-pipe* "r" _ . _)
In unknown file:
           0 (open-process "r" "git" "--bare" "rev-parse" #f)
ERROR: Wrong type (expecting string): #f

;;; (stop-clock 0.044223)

;;; (stop-clock 0.078508)

;;; (latest-posts ())

;;; (filter-mapn #f)
In tekuti/web.scm:
82:26 2 (handler #<<request> method: GET uri: #<<uri> scheme: http user…> …)
In tekuti/page.scm:
   192:20  1 (page-index _ _ ())
In tekuti/util.scm:
166:25 0 (filter-mapn #<procedure 563b0648dfc0 at tekuti/post.scm:233:3 …> …) ERROR: In procedure car: Wrong type argument in position 1 (expecting pair): #f

;;; (handler ())

;;; (start-clock)

;;; (start-clock)

;;; (posts)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (stop-clock 0.007265)

;;; (start-clock)

;;; (posts-by-date)

;;; (stop-clock 3.9e-5)

;;; (start-clock)

;;; (tags)

;;; (latest-posts ((posts-by-date) (posts . #<hash-table 563b05f398a0 0/31>) (master . "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd")))

;;; (filter-mapn ())

;;; (stop-clock 3.84e-4)

;;; (start-clock)

;;; (legit-comments)

;;; (computing-legit)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (done #<hash-table 563b05f395e0 0/31>)

;;; (stop-clock 0.0073279999999999994)

;;; (start-clock)

;;; (bogus-comments)

;;; (computing-bogus)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "cat-file" "commit" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd"))

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "rev-parse" #f))
In tekuti/index.scm:
   113:28 10 (_)
In tekuti/util.scm:
187:5 9 (with-time-debugging* #<procedure 563b05f38cc0 at tekuti/index.s…>)
In srfi/srfi-1.scm:
466:18 8 (fold #<procedure 563b05f38c80 at tekuti/index.scm:55:9 (spec i…> …)
In tekuti/index.scm:
58:25 7 (_ _ ((legit-comments . #<hash-table 563b05f395e0 0/31>) (. #) …))
In tekuti/util.scm:
187:5 6 (with-time-debugging* #<procedure 563b066aeab0 at tekuti/index.s…>)
In tekuti/comment.scm:
    206:2  5 (compute-bogus-comments _ _)
In tekuti/git.scm:
339:16 4 (fold-commits #<procedure 563b066aea80 at tekuti/comment.scm:20…> …)
   174:24  3 (git-rev-parse #f)
    92:15  2 (run _ _ _)
In ice-9/popen.scm:
    64:22  1 (open-pipe* "r" _ . _)
In unknown file:
           0 (open-process "r" "git" "--bare" "rev-parse" #f)
ERROR: Wrong type (expecting string): #f

;;; (stop-clock 0.038446999999999995)

;;; (stop-clock 0.054012)

;;; (start-clock)

;;; (start-clock)

;;; (posts)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (stop-clock 0.006633999999999999)

;;; (start-clock)

;;; (posts-by-date)

;;; (stop-clock 3.7e-5)

;;; (start-clock)

;;; (tags)

;;; (latest-posts ((posts-by-date) (posts . #<hash-table 563b06642600 0/31>) (master . "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd")))

;;; (filter-mapn ())

;;; (stop-clock 3.55e-4)

;;; (start-clock)

;;; (legit-comments)

;;; (computing-legit)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (done #<hash-table 563b066424a0 0/31>)

;;; (stop-clock 0.006411)

;;; (start-clock)

;;; (bogus-comments)

;;; (computing-bogus)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "cat-file" "commit" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd"))

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "rev-parse" #f))
In tekuti/index.scm:
   113:28 10 (_)
In tekuti/util.scm:
187:5 9 (with-time-debugging* #<procedure 563b0691e8c0 at tekuti/index.s…>)
In srfi/srfi-1.scm:
466:18 8 (fold #<procedure 563b0691e880 at tekuti/index.scm:55:9 (spec i…> …)
In tekuti/index.scm:
58:25 7 (_ _ ((legit-comments . #<hash-table 563b066424a0 0/31>) (. #) …))
In tekuti/util.scm:
187:5 6 (with-time-debugging* #<procedure 563b06923ea0 at tekuti/index.s…>)
In tekuti/comment.scm:
    206:2  5 (compute-bogus-comments _ _)
In tekuti/git.scm:
339:16 4 (fold-commits #<procedure 563b06923e70 at tekuti/comment.scm:20…> …)
   174:24  3 (git-rev-parse #f)
    92:15  2 (run _ _ _)
In ice-9/popen.scm:
    64:22  1 (open-pipe* "r" _ . _)
In unknown file:
           0 (open-process "r" "git" "--bare" "rev-parse" #f)
ERROR: Wrong type (expecting string): #f

;;; (stop-clock 0.052416)

;;; (stop-clock 0.066341)

;;; (handler ((cache)))

;;; (start-clock)

;;; (start-clock)

;;; (posts)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (stop-clock 0.01015)

;;; (start-clock)

;;; (posts-by-date)

;;; (stop-clock 3.6e-5)

;;; (start-clock)

;;; (tags)

;;; (latest-posts ((posts-by-date) (posts . #<hash-table 563b064767e0 0/31>) (master . "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd")))

;;; (filter-mapn ())

;;; (stop-clock 3.57e-4)

;;; (start-clock)

;;; (legit-comments)

;;; (computing-legit)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "ls-tree" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd" "."))

;;; (done #<hash-table 563b06476680 0/31>)

;;; (stop-clock 0.00756)

;;; (start-clock)

;;; (bogus-comments)

;;; (computing-bogus)

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "cat-file" "commit" "7e5d0ddb26c73c0602e8fdf24c1fd90eb9e35efd"))

;;; (pwd "/home/neil/blog.git")

;;; (run (() #f "git" "--bare" "rev-parse" #f))
In tekuti/index.scm:
   113:28 10 (_)
In tekuti/util.scm:
187:5 9 (with-time-debugging* #<procedure 563b06478d40 at tekuti/index.s…>)
In srfi/srfi-1.scm:
466:18 8 (fold #<procedure 563b06478d00 at tekuti/index.scm:55:9 (spec i…> …)
In tekuti/index.scm:
58:25 7 (_ _ ((legit-comments . #<hash-table 563b06476680 0/31>) (. #) …))
In tekuti/util.scm:
187:5 6 (with-time-debugging* #<procedure 563b06167a20 at tekuti/index.s…>)
In tekuti/comment.scm:
    206:2  5 (compute-bogus-comments _ _)
In tekuti/git.scm:
339:16 4 (fold-commits #<procedure 563b061679f0 at tekuti/comment.scm:20…> …)
   174:24  3 (git-rev-parse #f)
    92:15  2 (run _ _ _)
In ice-9/popen.scm:
    64:22  1 (open-pipe* "r" _ . _)
In unknown file:
           0 (open-process "r" "git" "--bare" "rev-parse" #f)
ERROR: Wrong type (expecting string): #f

;;; (stop-clock 0.038342999999999995)

;;; (stop-clock 0.056891)

;;; (latest-posts ((cache)))

;;; (filter-mapn #f)
In tekuti/web.scm:
82:26 2 (handler #<<request> method: GET uri: #<<uri> scheme: http user…> …)
In tekuti/page.scm:
    81:12  1 (_)
In tekuti/util.scm:
166:25 0 (filter-mapn #<procedure 563b062f9840 at tekuti/post.scm:233:3 …> …) ERROR: In procedure car: Wrong type argument in position 1 (expecting pair): #f




reply via email to

[Prev in Thread] Current Thread [Next in Thread]