don't look for template for source files without extension

pull/15/merge
Matthew Butterick 11 years ago
parent fdcd255756
commit b4af1936d5

@ -191,8 +191,8 @@
(let ([source-metas (cached-require source-path 'metas)]) (let ([source-metas (cached-require source-path 'metas)])
(and ((->symbol world:template-meta-key) . in? . source-metas) (and ((->symbol world:template-meta-key) . in? . source-metas)
(build-path source-dir (select-from-metas (->string world:template-meta-key) source-metas))))) ; path based on metas (build-path source-dir (select-from-metas (->string world:template-meta-key) source-metas))))) ; path based on metas
(build-path (world:current-project-root) (and (filename-extension (->output-path source-path)) (build-path (world:current-project-root)
(add-ext world:default-template-prefix (get-ext (->output-path source-path))))))) ; path to default template (add-ext world:default-template-prefix (get-ext (->output-path source-path)))))))) ; path to default template
(build-path (world:current-server-extras-path) world:fallback-template)))) ; fallback template (build-path (world:current-server-extras-path) world:fallback-template)))) ; fallback template

Loading…
Cancel
Save