Skip to content

Custom taxonomies#26

Merged
emhoracek merged 6 commits intolarcenyfrom
custom-taxonomies
Jan 9, 2017
Merged

Custom taxonomies#26
emhoracek merged 6 commits intolarcenyfrom
custom-taxonomies

Conversation

@emhoracek
Copy link
Member

No description provided.

TaxDictKey "tag" -> req "/tags/" []
TaxDictKey "category" -> req "/categories/" []
TaxDictKey resName -> req ("/taxonomies/" <> resName <> "/terms") []
AllTaxonomiesKey -> req "/taxonomies" []
Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

not needed

Just res -> return (getTaxSlug $ TaxDict res resName)

getSpecId :: TaxDict a -> TaxSpec a -> TaxSpecId a
getTaxonomies :: [TaxDict] -> TaxSpec -> TaxSpecId
Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

not needed

type TaxonomyItemSlug = Text
type TaxonomyItemId = Int

type TaxonomyDictionary = M.HashMap (TaxonomyName, TaxonomyItemSlug) TaxonomyItemId
Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

not needed

| PageKey Text
| AuthorKey Int
| TaxDictKey Text
| AllTaxonomiesKey
Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

not needed

@emhoracek emhoracek merged commit 6d68447 into larceny Jan 9, 2017
@emhoracek emhoracek deleted the custom-taxonomies branch January 9, 2017 22:13
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment

Labels

None yet

Projects

None yet

Development

Successfully merging this pull request may close these issues.

1 participant