Re: \version[temporary]

["Wolfgang Schuster" <schuster.wolfgang@googlemail.com>]

2007/12/18, Steffen Wolfrum <context@st.estfiles.de>:
> Hi,
>
> I don't know how many of you know/use this command above. It is quite
> useful for finding over-full lines and for controlling index/register
> marks.
>
> Unfortunately sometime the info printed for "Registers" is really
> hard to read (see example below).
>
> \definepapersize[steffen][width=15.7cm,height=23.2cm]
> \setuppapersize[steffen][steffen]
> \setuplayout
>         [width=113mm,height=576pt,
>         backspace=20mm,topspace=15mm,
>         header=12pt,headerdistance=6pt,
>         footer=42pt,footerdistance=0pt,
>         location=middle,marking=off,grid=no]
> \version[temporary]
> \showframe
> \starttext
> \dorecurse{10}{text\footnote{note\index{keyword}}\par}
> \stoptext
>
>
> Thus, I'd like to ask: How can I
> 1) kill the "References" footnote (do't need it)
> 2) move the "Registers" info 2cm to the right in the margin?
>
> Thank you,
>
> Steffen

\unprotect

\startconstants all
      register: register
         float: float
\stopconstants

\def\dodoversion[#1][#2]%
  {\processaction
     [#1]
     [    \v!final=>\chardef\conceptmode\zerocount
                    \overfullrule\zeropoint,
        \v!concept=>\chardef\conceptmode\plusone,  % simple banner
           \v!file=>\chardef\conceptmode\plustwo,  % full banner
      \v!temporary=>\chardef\conceptmode\plusthree % full banner plus
                    \overfullrule5\points]%        % info in the margin
   \def\dodocommand##1=##2\relax
     {\processaction
        [##2]
        [\v!yes=>\setvalue{##1info}{\csname\s!do##1info\endcsname},
          \v!no=>\letvalue{##1info}\gobbletwoarguments]}%
   \def\docommand##1{\@EA\dodocommand##1\relax}%
   \processcommalist[#2]\docommand}

\def\doversion[#1][#2]%
  {\ifsecondargument
     \dodoversion[#1][#2]%
   \else
     \doifassignmentelse{#1}
       {\dodoversion[][#1]}
       {\dodoversion[#1][]}%
   \fi}

\def\version
  {\dodoubleempty\doversion}

\def\doreferenceinfo{\dotestinfo\referenceinfobox}
\def\doregisterinfo  {\dotestinfo\registerinfobox}
\def\dofloatinfo     {\dotestinfo\floatinfobox}

\version[\v!final][\c!reference=\v!yes,\c!register=\v!yes,\c!float=\v!yes]

\protect

\version[temporary][reference=no]
%\version[temporary]
%\version[reference=no]

\definepapersize[test][width=157mm,height=232mm]
\setuppapersize[test][test]

\setuplayout
  [width=113mm,
   backspace=20mm,
   location=middle,
  ]

\showframe

\starttext
\dorecurse{10}{text\footnote{note\index{keyword}}\par}
\stoptext

Wolfgang
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : https://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________