+ toPathTemplate' = toPathTemplate . replaceTopdir topdir
+ i_copy = i { prefix = toPathTemplate' iprefix,
+ bindir = toPathTemplate' ibindir,
+ libdir = toPathTemplate' ilibdir,
+ dynlibdir = toPathTemplate' idynlibdir,
+ libexecdir = toPathTemplate' ilibexecdir,
+ datadir = toPathTemplate' idatadir,
+ docdir = toPathTemplate' idocdir,
+ htmldir = toPathTemplate' ihtmldir,
+ haddockdir = toPathTemplate' ihaddockdir
+ }