From 996087b3dbc4679ae437408cbbafd54aa642cbfe Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 27 Mar 2014 23:33:25 +0000 Subject: biblatex-true-citepages-omit (27mar14) git-svn-id: svn://tug.org/texlive/trunk@33305 c570f23f-e606-0410-a88d-b1316a301751 --- .../biblatex-true-citepages-omit.sty | 50 ++++++++++++++++++++++ 1 file changed, 50 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/biblatex-true-citepages-omit/biblatex-true-citepages-omit.sty (limited to 'Master/texmf-dist/tex/latex') diff --git a/Master/texmf-dist/tex/latex/biblatex-true-citepages-omit/biblatex-true-citepages-omit.sty b/Master/texmf-dist/tex/latex/biblatex-true-citepages-omit/biblatex-true-citepages-omit.sty new file mode 100644 index 00000000000..37d4760544d --- /dev/null +++ b/Master/texmf-dist/tex/latex/biblatex-true-citepages-omit/biblatex-true-citepages-omit.sty @@ -0,0 +1,50 @@ +%% Copyright 2013 Maïeul Rouquette +% +% This work may be distributed and/or modified under the +% conditions of the LaTeX Project Public License, either version 1.3 +% of this license or (at your option) any later version. +% The latest version of this license is in +% http://www.latex-project.org/lppl.txt +% and version 1.3 or later is part of all distributions of LaTeX +% version 2005/12/01 or later. +% +% This work has the LPPL maintenance status `maintained'. +% +% The Current Maintainer of this work is Maïeul Rouquette +% +% This work consists of the file biblatex-real-citepages-omit.sty + +\NeedsTeXFormat{LaTeX2e} +\ProvidesPackage{biblatex-true-citepages-omit}[2014/03/25 v1.0.0 real run of citepages=omit for biblatex] +\RequirePackage{xstring} + +\AtEveryCitekey{% + \usebibmacro{real-citepages-omit}% +}{}{} + +\newbibmacro{real-citepages-omit}{% + \iffieldundef{postnote}{}{% + \renewcommand{\do}[1]{% + \global\csletcs{old##1}{##1}% + \global\csletcs{##1}{relax}% + }% + \dolistloop{\realcitepagesomit@cmd}% + \IfBeginWith{\csfield{postnote}}{\pno}{\clearfield{pages}}{% + \IfBeginWith{\csfield{postnote}}{\ppno}{\clearfield{pages}}{}}% + % + \renewcommand{\do}[1]{% + \global\csletcs{##1}{old##1}% + }% + \dolistloop{\realcitepagesomit@cmd}% + }% +}% + +\def\realcitepagesomit@cmd{} + +\newcommand{\realcitepagesomitcmd}[1]{\listadd{\realcitepagesomit@cmd}{#1}} +\realcitepagesomitcmd{emph} +\realcitepagesomitcmd{textbf} + + + +\endinput \ No newline at end of file -- cgit v1.2.3