(www-batch-view-smart): Support ...//index.<lang>.html to specify

[chise/est.git] / cwiki-view.el

diff --git a/cwiki-view.el b/cwiki-view.el
index 33c6957..ba15468 100644 (file)
--- a/cwiki-view.el
+++ b/cwiki-view.el
@@ -844,6 +844,10 @@ size=\"30\" maxlength=\"30\" value=\"%s\" />"
           ((string-match "/index\\.ttl$" target)
            (setq turtle t
                  target (substring target 0 (match-beginning 0)))
+           )
+          ((string-match "/index\\.\\(...*\\)\\.html$" target)
+           (setq lang (intern (match-string 1 target))
+                 target (substring target 0 (match-beginning 0)))
            ))
          (when (string-match "^char/\\(&[^&;]+;\\)" target)
            (setq ret (match-end 0))