-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy path.lein-repl-history
54 lines (54 loc) · 1.17 KB
/
.lein-repl-history
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
exit
(use 'picture-gallery.repl)
(start-server)
(use 'picture-gallery.repl)
(start-server)
(use 'picture-gallery.repl)
(start-server)
(exit)
(use 'picture-gallery.models.db)
(use 'korma.db)
(defentity uses)
(use 'picture-gallery.models.db)
(use 'picture-gallery.repl)
(quit)
(use 'picture-gallery.models.db)
(use 'korma.core )
(use 'korma.db)
(defentity user)
(defdb korma-db nil)
(use 'picture-gallery.models.db)
(reuse 'picture-gallery.models.db)
(reload 'picture-gallery.models.db)
(use 'picture-gallery.models.db)
(use 'korma.db)
(def db
{:subprotocol "postgresql"
:subname "//127.0.0.1:5432/gallery"
:user "admin"
:password "admin"})
(defdb korma-db db)
(defentity users)
(use 'korma.core)
(defentity users)
(defentity images)
(defn get-user [id]
(first (select users
(where {:id id}))))
(get-user "hzm")
(get-user "stt")
(ns ppp)
(ns picture-gallery.models.db
(:require
[korma.db :refer :all]
[korma.core :refer :all]))
(def db
{:subprotocol "postgresql"
:subname "//127.0.0.1:5432/gallery"
:user "admin"
:password "admin"})
(defdb korma-db db)
(defentity users)
(defentity images)
(defn create-user [user]
(insert users (values user)))