0

在一个简单的 Web 应用程序中，如果在用户交互开始之前它们不存在，我想创建一些 CouchDB 设计文档。我知道如果我使用的是 SQL 数据库，那么我会使用迁移lein migrate或类似的方法来实现这种效果。

但是，在这里我将使用该couch库与 JSON 共同创建设计文档，如下所示：

{ "_id": "_design/pages", "language": "javascript", "views": { "by_tag": { "map": "function(doc) {\n if ('tags' in doc) {\n doc.tags.forEach( function(tag) {\n emit(tag, doc._id );\n });\n }\n}\t\n" } } }

我尝试在and中创建一个init函数（正如各种 Clojure 书籍所建议的那样），但这从未被调用过。handler.cljcore.clj

我把这段代码放在哪里？

4

1 回答 1

0

这就是我的工作...

添加一个用于数据库设置的新模块和一些创建视图的函数：

(ns clojure-wiki.models.setup
  (:require [com.ashafa.clutch :as couch]
            [clojure-wiki.models.db :as db]))


(defn create-page-views []
  (db/with-db
    (couch/save-view "pages" (couch/view-server-fns
                               :javascript
                               {:by_tag {:map
"function(doc) {
  if ('tags' in doc) {
    doc.tags.forEach( function(tag) {
      emit(tag, doc._id );
    });
  }
}"
                                         }
                                :by_word {:map
"function(doc) {
  const stopwords = ['and', 'the'];
  var freq = {};
  ((doc._id + \" \" + doc.tags + \" \" + doc.content).toLowerCase().match(/\\w+/g)).forEach(function(word) {
    if (word.length >= 3 && stopwords.indexOf(word) == -1) {
      freq[word] = (freq[word] || 0) +1;
    }
  });
  Object.keys(freq).forEach(function(word) {
    emit(word, {count: freq[word]});
  });
}"
                                          }}))))

(defn setup-db []
  (create-page-views))

将任务别名添加到project.clj：

:aliases
  {"setup-db" ["run" "-m" "clojure-wiki.models.setup/setup-db"]}

现在我可以将其作为一次性任务运行：

lein setup-db
于 2017-02-20T10:42:43.780 回答