Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

ran the hugoclr/-main from the REPL and it printed all of the 2000's …

…records. Need to clean up titles, authors and publishers from 2008 through 2000.
  • Loading branch information...
commit bc04d678c56c07d303629d8d188e547e866e6f7c 1 parent 69dcfc3
@rippinrobr authored
Showing with 3 additions and 3 deletions.
  1. +2 −2 hugoclr.clj
  2. +1 −1  hugoclr/parser.clj
View
4 hugoclr.clj
@@ -5,12 +5,12 @@
(ns hugoclr
(:gen-class)
(:use hugoclr.parser)
- (:use hugoclr.data.csv :as csv ))
+ (:use hugoclr.data.csv))
(def base-url "http://www.thehugoawards.org/hugo-history/")
(defn -main [& args]
(println (str "base-url: " base-url))
(let [awards (hugoclr.parser/get-awards base-url)]
- (csv/)
+ (hugoclr.data.csv/write-to-file awards "c:\\temp\\hugo.txt")))
View
2  hugoclr/parser.clj
@@ -78,4 +78,4 @@
(let [links (get-html-elements url "//li[@class]/a[@href]")
award-links (filter #(not (nil? %)) (map validate-award-link links))]
;; award-links))
- (map parse-awards-page (take 2 award-links))))
+ (map parse-awards-page (take 12 award-links))))
Please sign in to comment.
Something went wrong with that request. Please try again.