Skip to content

Commit

Permalink
ajout vignettes
Browse files Browse the repository at this point in the history
  • Loading branch information
ServanneMo committed Apr 4, 2017
1 parent 5183065 commit 82eb840
Showing 1 changed file with 5 additions and 3 deletions.
8 changes: 5 additions & 3 deletions teiGI2csv.xq
Expand Up @@ -85,6 +85,8 @@ let $toBeCsv := <itemList>{
let $author := $item//author
let $date := fn:string($item//publicationStmt/date/@when)
let $rubrique := map:get($rubriques, fn:data($item//profileDesc[1]/textClass[1]/catRef[1]/@target))
let $thumbnail := map:get($images, fn:data($item/@xml:id))

return
<item>
<year>{fn:substring($date,1,4)}</year>
Expand All @@ -102,7 +104,7 @@ let $toBeCsv := <itemList>{
<mediaCredit></mediaCredit>
<mediaCaption></mediaCaption>
<type></type>
<mediaThumbnail></mediaThumbnail>
<mediaThumbnail>{$thumbnail}</mediaThumbnail>
<Group>{$rubrique}</Group>
<background></background>
</item>
Expand All @@ -117,5 +119,5 @@ let $output := csv:serialize($toBeCsv, $options)

(: écrit les données dans un fichier CSV :)
return
file:write-text("/home/nicolas/ownCloud/General_instin/data/script/teicsv2.csv", $output)
file:write-text("/Users/servannemonjour/ownCloud/General_instin/data/script/teicsv2.csv", $output)

0 comments on commit 82eb840

Please sign in to comment.