[Refdb-cvs] CVS: refdb/scripts libgen.pl,1.5.2.3,1.5.2.4 vargen.pl,1.2,1.2.2.1
Status: Beta
Brought to you by:
mhoenicka
Menu
▾
▴
[Refdb-cvs] CVS: refdb/scripts libgen.pl,1.5.2.3,1.5.2.4 vargen.pl,1.2,1.2.2.1
|
From: Markus H. <mho...@us...> - 2005-10-02 23:38:22
|
Update of /cvsroot/refdb/refdb/scripts In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32648/scripts Modified Files: Tag: Release_0_9_5_stable libgen.pl vargen.pl Log Message: added support for title-instead-of-missing-author Index: libgen.pl =================================================================== RCS file: /cvsroot/refdb/refdb/scripts/libgen.pl,v retrieving revision 1.5.2.3 retrieving revision 1.5.2.4 diff -u -U2 -r1.5.2.3 -r1.5.2.4 --- libgen.pl 27 Nov 2004 23:13:47 -0000 1.5.2.3 +++ libgen.pl 2 Oct 2005 23:38:14 -0000 1.5.2.4 @@ -26,8 +26,8 @@ "issn" => "SERIAL", "publishername" => "PUBLISHER", - "ulink" => "URL"); + "ulink" => "LINK0"); # this list holds all "elements" that are created as a seg with an attribute -my @tei_seg_elements = ("userdef1", "userdef2", "userdef3", "userdef4", "userdef5", "misc1", "misc2", "misc3", "link1", "link2", "link3", "link4", "notes"); +my @tei_seg_elements = ("userdef1", "userdef2", "userdef3", "userdef4", "userdef5", "misc1", "misc2", "misc3", "link0", "link1", "link2", "link3", "link4", "notes"); # this list holds all "elements" that are created as a biblScope with @@ -59,4 +59,5 @@ "misc2" => "MISC2", "misc3" => "MISC3", + "link0" => "LINK0", "link1" => "LINK1", "link2" => "LINK2", @@ -254,4 +255,23 @@ } + # title as author in bibliography + # todo: bibliomset[@role='bibliography']/???/bibliomset[@relation='author']/title + print "<!-- title as author in bibliography -->\n\n"; + + print "<xsl:template match=\"bibliomset[\@role=\'bibliography\']/bibliomset/bibliomset[\@relation=\'author\']/title\" mode=\"refdb\">\n <xsl:variable name=\"reftype\" select=\"ancestor::bibliomixed/\@role\"/>\n <xsl:choose>\n"; + + foreach $type (@types) { + print " <xsl:when test=\"\$reftype=\'$type\'\">\n <xsl:call-template name=\"refdb-process-inline\">\n <xsl:with-param name=\"style\" select=\"\$$type" . "AUTHORLISTALTERNATESTYLE\"/>\n </xsl:call-template>\n </xsl:when>\n"; + } + + print " </xsl:choose>\n</xsl:template>\n\n"; + + # title as author in intext citation + print "<!-- title as author in intext citation -->\n\n"; + + foreach $type (@intext_types) { + print "<xsl:template match=\"bibliomset[\@relation=\'author\'][title]\" mode=\"$type\">\n <xsl:call-template name=\"refdb-process-inline\">\n <xsl:with-param name=\"style\" select=\"\$$type" . "AUTHORLISTALTERNATESTYLE\"/>\n </xsl:call-template>\n</xsl:template>\n\n"; + } + # folded multiple citation print "<!-- folded multiple citation -->\n\n"; @@ -497,4 +517,22 @@ } + # title as author in bibliography + print "<!-- title as author in bibliography -->\n\n"; + + print "<xsl:template match=\"seg[\@type=\'author\']/title\" mode=\"refdb\">\n <xsl:variable name=\"reftype\" select=\"ancestor::bibl/\@rend\"/>\n <xsl:choose>"; + + foreach $type (@types) { + print " <xsl:when test=\"\$reftype=\'$type\'\">\n <xsl:call-template name=\"refdb-process-inline\">\n <xsl:with-param name=\"style\" select=\"\$$type" . "AUTHORLISTALTERNATESTYLE\"/>\n </xsl:call-template>\n </xsl:when>\n"; + } + + print " </xsl:choose>\n</xsl:template>\n\n"; + + # title as author in intext citation + print "<!-- title as author in intext citation -->\n\n"; + + foreach $type (@intext_types) { + print "<xsl:template match=\"seg[\@type=\'author\'][title]\" mode=\"$type\">\n <xsl:call-template name=\"refdb-process-inline\">\n <xsl:with-param name=\"style\" select=\"\$$type" . "AUTHORLISTALTERNATESTYLE\"/>\n </xsl:call-template>\n</xsl:template>\n\n"; + } + print "<!-- folded multiple citation -->\n\n"; Index: vargen.pl =================================================================== RCS file: /cvsroot/refdb/refdb/scripts/vargen.pl,v retrieving revision 1.2 retrieving revision 1.2.2.1 diff -u -U2 -r1.2 -r1.2.2.1 --- vargen.pl 12 Sep 2003 00:11:37 -0000 1.2 +++ vargen.pl 2 Oct 2005 23:38:14 -0000 1.2.2.1 @@ -9,5 +9,5 @@ # this list holds all citation/reference part styles -my @styles = ("ALLALISTSTYLE", "AUTHORLISTSTYLE", "EDITORLISTSTYLE", "SEDITORLISTSTYLE", "ALLALISTAUTHORNAMESNAMEFIRSTINITIALSTYLE", "AUTHORLISTAUTHORNAMESNAMEFIRSTINITIALSTYLE", "EDITORLISTAUTHORNAMESNAMEFIRSTINITIALSTYLE", "SEDITORLISTAUTHORNAMESNAMEFIRSTINITIALSTYLE", "ALLALISTAUTHORNAMESNAMEOTHERINITIALSTYLE", "AUTHORLISTAUTHORNAMESNAMEOTHERINITIALSTYLE", "EDITORLISTAUTHORNAMESNAMEOTHERINITIALSTYLE", "SEDITORLISTAUTHORNAMESNAMEOTHERINITIALSTYLE", "PUBDATESTYLE", "PUBDATESECSTYLE", "PUBDATEALLSTYLE", "TITLESTYLE", "BOOKTITLESTYLE", "SERIESTITLESTYLE", "ALLTITLESTYLE", "JOURNALNAMESTYLE", "VOLUMESTYLE", "ISSUESTYLE", "PAGESSTYLE", "PUBLISHERSTYLE", "PUBPLACESTYLE", "SERIALSTYLE", "ADDRESSSTYLE", "URLSTYLE", "USERDEF1STYLE", "USERDEF2STYLE", "USERDEF3STYLE", "USERDEF4STYLE", "USERDEF5STYLE", "MISC1STYLE", "MISC2STYLE", "MISC3STYLE", "NOTESSTYLE", "ABSTRACTSTYLE", "LINK1STYLE", "LINK2STYLE", "LINK3STYLE", "LINK4STYLE", "REFNUMBERSTYLE", "PAGESPAGERANGESTYLE", "ALLALISTABBREVIATEFIRSTSTYLE", "ALLALISTABBREVIATESUBSEQSTYLE", "AUTHORLISTABBREVIATEFIRSTSTYLE", "EDITORLISTABBREVIATEFIRSTSTYLE", "SEDITORLISTABBREVIATEFIRSTSTYLE", "AUTHORLISTABBREVIATESUBSEQSTYLE", "EDITORLISTABBREVIATESUBSEQSTYLE", "SEDITORLISTABBREVIATESUBSEQSTYLE"); +my @styles = ("ALLALISTSTYLE", "AUTHORLISTSTYLE", "EDITORLISTSTYLE", "SEDITORLISTSTYLE", "ALLALISTALTERNATESTYLE", "AUTHORLISTALTERNATESTYLE", "EDITORLISTALTERNATESTYLE", "SEDITORLISTALTERNATESTYLE", "ALLALISTAUTHORNAMESNAMEFIRSTINITIALSTYLE", "AUTHORLISTAUTHORNAMESNAMEFIRSTINITIALSTYLE", "EDITORLISTAUTHORNAMESNAMEFIRSTINITIALSTYLE", "SEDITORLISTAUTHORNAMESNAMEFIRSTINITIALSTYLE", "ALLALISTAUTHORNAMESNAMEOTHERINITIALSTYLE", "AUTHORLISTAUTHORNAMESNAMEOTHERINITIALSTYLE", "EDITORLISTAUTHORNAMESNAMEOTHERINITIALSTYLE", "SEDITORLISTAUTHORNAMESNAMEOTHERINITIALSTYLE", "PUBDATESTYLE", "PUBDATESECSTYLE", "PUBDATEALLSTYLE", "TITLESTYLE", "BOOKTITLESTYLE", "SERIESTITLESTYLE", "ALLTITLESTYLE", "JOURNALNAMESTYLE", "VOLUMESTYLE", "ISSUESTYLE", "PAGESSTYLE", "PUBLISHERSTYLE", "PUBPLACESTYLE", "SERIALSTYLE", "ADDRESSSTYLE", "URLSTYLE", "USERDEF1STYLE", "USERDEF2STYLE", "USERDEF3STYLE", "USERDEF4STYLE", "USERDEF5STYLE", "MISC1STYLE", "MISC2STYLE", "MISC3STYLE", "NOTESSTYLE", "ABSTRACTSTYLE", "LINK1STYLE", "LINK2STYLE", "LINK3STYLE", "LINK4STYLE", "REFNUMBERSTYLE", "PAGESPAGERANGESTYLE", "ALLALISTABBREVIATEFIRSTSTYLE", "ALLALISTABBREVIATESUBSEQSTYLE", "AUTHORLISTABBREVIATEFIRSTSTYLE", "EDITORLISTABBREVIATEFIRSTSTYLE", "SEDITORLISTABBREVIATEFIRSTSTYLE", "AUTHORLISTABBREVIATESUBSEQSTYLE", "EDITORLISTABBREVIATESUBSEQSTYLE", "SEDITORLISTABBREVIATESUBSEQSTYLE"); |
