Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

Sign up
Appearance settings

Commit 1a9f935

Browse files
author
Kapil Reddy
committed
FIX - Process namespace assertions
1 parent 3c14ed1 commit 1a9f935

File tree

1 file changed

+12
-6
lines changed

1 file changed

+12
-6
lines changed

‎src/icw/data/process.clj

Lines changed: 12 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -33,10 +33,10 @@
3333

3434

3535
(comment
36-
(= (parse-line "1,1967,Sgt. Pepper's Lonely Hearts Club Band,The Beatles,Rock,\"Rock & Roll,Psychedelic Rock\"")
36+
(= (parse-line "1,1967,Sgt. Pepper's Lonely Hearts Club Band,The Beatles,Rock,\"Rock & Roll,Psychedelic Rock\"")
3737
["1"
3838
"1967"
39-
"Sgt. Pepper's Lonely Hearts Club BandThe Beatles"
39+
"Sgt. Pepper's Lonely Hearts Club Band"
4040
"The Beatles"
4141
"Rock"
4242
["Rock & Roll"
@@ -57,18 +57,24 @@
5757
Output
5858
{:number \"1\"
5959
:year \"1967\"
60-
:artist \"The beatles\"p
61-
:album \"Sgt. Pepper's Lonely Hearts Club BandThe Beatles\"
60+
:artist \"The beatles\"
61+
:album \"Sgt. Pepper's Lonely Hearts Club Band\"
6262
:genre \"Rock\"
6363
:subgenre-xs [\"Rock & Roll\"
6464
\"Psychedelic Rock\"]}"
6565
[xs]
66-
)
66+
(let [[id year album artist genre subgenre-xs] xs]
67+
{:number id
68+
:year year
69+
:album album
70+
:artist artist
71+
:genre genre
72+
:subgenre subgenre-xs}))
6773

6874
(comment
6975
(= (line-vec->line-map ["1"
7076
"1967"
71-
"Sgt. Pepper's Lonely Hearts Club BandThe Beatles"
77+
"Sgt. Pepper's Lonely Hearts Club Band"
7278
"The Beatles"
7379
"Rock"
7480
["Rock & Roll"

0 commit comments

Comments
(0)

AltStyle によって変換されたページ (->オリジナル) /