--- directory-1.20/directory.sty	2004-09-22 23:06:04.000000000 +0200
+++ texmf/tex/latex/directory/directory.sty	2007-01-12 03:17:07.000000000 +0200
@@ -391,7 +391,8 @@
 % ------------------------------------------------------------ 
 %
 \def\dirlastletter{-}
-\def\dircheck#1{\if#1\dirlastletter\else\def\dirlastletter{#1}\Dirheader{#1}\fi}
+\def\dirnextletter{-}
+\def\dircheck#1{\def\dirnextletter{\string#1}\if\dirnextletter\dirlastletter\else\def\dirlastletter{\string#1}\Dirheader{#1}\fi}
 %
 % ------------------------------------------------------------ 
 %  define remaining bbl file commands