@@ -1449,9 +1449,11 @@ include name = do
14491449 fs <- (map (T.unpack . removeDoubleQuotes . T.strip) . T.splitOn "," .
14501450 untokenize) <$> braced
14511451 let addExt f = case takeExtension f of
1452− "" | name == "usepackage" -> addExtension f ".sty"
1453− | otherwise -> addExtension f ".tex"
1454− _ -> f
1452+ ".tex" -> f
1453+ ".sty" -> f
1454+ -- note, we can have cc_by_4.0 for example...
1455+ _ | name == "usepackage" -> addExtension f ".sty"
1456+ | otherwise -> addExtension f ".tex"
14551457 dirs <- (splitBy (==':') . fromMaybe ".") <$> lookupEnv "TEXINPUTS"
14561458 mapM_ (insertIncluded dirs) (map addExt fs)
14571459 return mempty