Fake small caps

[leingang]

Maybe this goes in the font package

% Neither Gotham nor Arev come with small caps.  So we “fake” it.
% See \url{https://tex.stackexchange.com/a/55733/1402}
%    \begin{macrocode}
\def\fakesc#1{%
  \begingroup%
  \xdef\fake@name{\csname\curr@fontshape/\f@size\endcsname}%
  \fontsize{\fontdimen8\fake@name}{\baselineskip}\selectfont%
  \MakeUppercase{#1}%
  \endgroup%
}
\let\textsc\fakesc
%    \end{macrocode}