\version[temporary]

\version[temporary]

[Steffen Wolfrum]

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
___________________________________________________________________________________
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
___________________________________________________________________________________

Re: \version[temporary]

[Wolfgang Schuster]

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
___________________________________________________________________________________

Re: \version[temporary]

[Steffen Wolfrum]

... and what about moving it a bit to the right? 10mm maybe?

Steffen



Am 19.12.2007 um 13:00 schrieb Wolfgang Schuster:

> 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
> ______________________________________________________________________ 
> _____________

___________________________________________________________________________________
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
___________________________________________________________________________________

Re: \version[temporary]

[Wolfgang Schuster]

2007/12/19, Steffen Wolfrum <context@st.estfiles.de>:
> ... and what about moving it a bit to the right? 10mm maybe?
>
> Steffen

Not very easy to change, the length for the version text is fixed and
the distance
to the right side use also a fixed value. It would make sense to
replace the current
version values to real key-val settings with a namespace. Not very
hard but should
be better done by Hans.

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
___________________________________________________________________________________

Re: \version[temporary]

[Wolfgang Schuster]

2007/12/19, Steffen Wolfrum <context@st.estfiles.de>:
> ... and what about moving it a bit to the right? 10mm maybe?
>
> Steffen

Hi Steffen,

take a look at the following solution, you can change the distance
to the right margin with the distance (you can also use negativ values),
the width key has no real effect, it changes only the length of the box
for the info text.

\unprotect

\definesystemvariable {vs} % VerSion

\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
   \getparameters[\??vs][#2]%
   \doifelse\@@vsreference\v!yes
     {\let\referenceinfo\doreferenceinfo}
     {\let\referenceinfo\gobbletwoarguments}%
   \doifelse\@@vsregister\v!yes
     {\let\registerinfo\doregisterinfo}
     {\let\egisterinfo\gobbletwoarguments}%
   \doifelse\@@vsfloat\v!yes
     {\let\floatreference\dofloatreference}
     {\let\floatreference\gobbletwoarguments}}

\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}

\def\doaddstatusinfo#1%
  {\setbox#1\vbox to \paperheight
     {\vsmashbox#1\box#1%
      \offinterlineskip
      \vskip\topspace
      \hsize\paperwidth
      \hfill\hbox{\placetestinfo\hskip\@@vsdistance}\vss
      \settexthoffset\hskip\texthoffset % brrrr
     %\tlap{\placeversioninfo}\vskip.5cm}}
      \vbox to 1cm{\vss\placeversioninfo\vss}}}

\def\dotestinfo#1#2#3%
  {\ifinpagebody\else\ifnum\conceptmode=\plusthree
     \begingroup
       \@EA\convertargument#3\to\ascii
       \xdef\extratestinfo
         {#2\space\ascii}%
       \gdef\totaltestinfo
         {\global\setbox#1\vbox
            {\unvbox#1\relax
             \infofont \setupinterlinespace
             \hbox
               {\strut
                \expanded{\doboundtext{\extratestinfo}{\@@vswidth}{..}}%
                \quad}}}%
     \endgroup
     \ifinner
       \aftergroup\totaltestinfo
     \else
       \totaltestinfo
     \fi
   \fi\fi}

\version
  [\v!final]
  [\c!reference=\v!yes,
   \c!register=\v!yes,
   \c!float=\v!yes,
   \c!distance=.5cm,
   \c!width=12em]

\protect

\version[temporary][reference=no,distance=-5pt]
%\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

@Hans: Is \conceptmode a global macro I could myself in a third party module.

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
___________________________________________________________________________________

Re: \version[temporary]

[Steffen Wolfrum]

Jesus!
Two pages of source code for just some millimeters moving ;o) thank  
you very, very much!!

Now, finally, I can actually read the info that \version[temporary]  
prints on all my pages ... great.


Steffen



Am 20.12.2007 um 09:15 schrieb Wolfgang Schuster:

> 2007/12/19, Steffen Wolfrum <context@st.estfiles.de>:
>> ... and what about moving it a bit to the right? 10mm maybe?
>>
>> Steffen
>
> Hi Steffen,
>
> take a look at the following solution, you can change the distance
> to the right margin with the distance (you can also use negativ  
> values),
> the width key has no real effect, it changes only the length of the  
> box
> for the info text.
>
> \unprotect
>
> \definesystemvariable {vs} % VerSion
>
> \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
>    \getparameters[\??vs][#2]%
>    \doifelse\@@vsreference\v!yes
>      {\let\referenceinfo\doreferenceinfo}
>      {\let\referenceinfo\gobbletwoarguments}%
>    \doifelse\@@vsregister\v!yes
>      {\let\registerinfo\doregisterinfo}
>      {\let\egisterinfo\gobbletwoarguments}%
>    \doifelse\@@vsfloat\v!yes
>      {\let\floatreference\dofloatreference}
>      {\let\floatreference\gobbletwoarguments}}
>
> \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}
>
> \def\doaddstatusinfo#1%
>   {\setbox#1\vbox to \paperheight
>      {\vsmashbox#1\box#1%
>       \offinterlineskip
>       \vskip\topspace
>       \hsize\paperwidth
>       \hfill\hbox{\placetestinfo\hskip\@@vsdistance}\vss
>       \settexthoffset\hskip\texthoffset % brrrr
>      %\tlap{\placeversioninfo}\vskip.5cm}}
>       \vbox to 1cm{\vss\placeversioninfo\vss}}}
>
> \def\dotestinfo#1#2#3%
>   {\ifinpagebody\else\ifnum\conceptmode=\plusthree
>      \begingroup
>        \@EA\convertargument#3\to\ascii
>        \xdef\extratestinfo
>          {#2\space\ascii}%
>        \gdef\totaltestinfo
>          {\global\setbox#1\vbox
>             {\unvbox#1\relax
>              \infofont \setupinterlinespace
>              \hbox
>                {\strut
>                 \expanded{\doboundtext{\extratestinfo}{\@@vswidth} 
> {..}}%
>                 \quad}}}%
>      \endgroup
>      \ifinner
>        \aftergroup\totaltestinfo
>      \else
>        \totaltestinfo
>      \fi
>    \fi\fi}
>
> \version
>   [\v!final]
>   [\c!reference=\v!yes,
>    \c!register=\v!yes,
>    \c!float=\v!yes,
>    \c!distance=.5cm,
>    \c!width=12em]
>
> \protect
>
> \version[temporary][reference=no,distance=-5pt]
> %\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
>
> @Hans: Is \conceptmode a global macro I could myself in a third  
> party module.
>
> 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
> ______________________________________________________________________ 
> _____________

___________________________________________________________________________________
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
___________________________________________________________________________________