ertugrulcetin

(defproject clj-web-app "0.1.0-SNAPSHOT"
  :description "Clojure ile örnek web uygulama"
  :url "http://example.com/FIXME"
  :license {:name "EPL-2.0 OR GPL-2.0-or-later WITH Classpath-exception-2.0"
            :url  "https://www.eclipse.org/legal/epl-2.0/"}
  :dependencies [[org.clojure/clojure "1.10.0"]
                 [ring "1.8.0"]
                 [patika "0.1.10"]]
  :main ^:skip-aot clj-web-app.core
  :repl-options {:init-ns clj-web-app.core})

ertugrulcetin

ŞEN
KANDEMİR
ÇEVİK
ERKURAN
TÜTEN
ÖZTÜRK
YÜZBAŞIOĞLU
VURAL
YÜCEL
SÖNMEZ

ertugrulcetin

-- Turkce isimler sozlugu twitter : http://twitter.com/baskindev

CREATE TABLE `isimler` (
  `id` int(11) NOT NULL AUTO_INCREMENT,
  `isimler` varchar(255) DEFAULT NULL,
  `cinsiyet` varchar(255) DEFAULT NULL COMMENT 'erkek : E , kadın : K , uniseks : U',
  PRIMARY KEY (`id`)
) ENGINE=InnoDB;

-- ----------------------------

ertugrulcetin

JALE
ALİ
MAHMUT
MANSUR KÜRŞAD
GAMZE
MİRAÇ
YÜCEL
KUBİLAY
HAYATİ
BEDRİYE MÜGE

ertugrulcetin

-- Turkce isimler sozlugu twitter : http://twitter.com/tserpico

CREATE TABLE `isimler` (
  `id` int(11) NOT NULL AUTO_INCREMENT,
  `isimler` varchar(255) DEFAULT NULL,
  `cinsiyet` varchar(255) DEFAULT NULL COMMENT 'erkek : E , kadın : K , uniseks : U',
  PRIMARY KEY (`id`)
) ENGINE=InnoDB;

-- ----------------------------

ertugrulcetin

CREATE TABLE soyisimler (
	id int IDENTITY(1,1) NOT NULL,
	soyisim varchar(255) NOT NULL,
	PRIMARY KEY (id)
)

INSERT INTO soyisimler VALUES ('ABAT');
INSERT INTO soyisimler VALUES ('ABSEYİ');
INSERT INTO soyisimler VALUES ('ABACIOĞLU');
INSERT INTO soyisimler VALUES ('ACAR');

ertugrulcetin

Please read this gist first: Deploying to Elastic Beanstalk via CircleCi 2.0

Here is my .elasticbeanstalk/config.yml config:

branch-defaults:
  master:
    environment: myapp-env

deploy:

ertugrulcetin

(defn find-index-route
  [x form]
  (letfn [(get-nodes [form]
            (tree-seq coll? identity form))

          (get-tree [form]
            (rest (get-nodes form)))

          (get-level [form]
            (if (or (not (coll? form)) (not (seq form)))

ertugrulcetin

(def speed 750)
(def moving-frequency 15)

(defn scroll-to-id
  [elem target-id]
  (let [target (.getElementById js/document target-id)
        elem-scroll-top (-> elem .-scrollTop)
        hop-count (/ speed moving-frequency)
        gap (/ (- (-> target .-offsetTop) elem-scroll-top) hop-count)]
    (doseq [i (range 1 (inc hop-count))]

ertugrulcetin

(def data [{:v 12, :a 10} {:v 21, :a 113} {:v 1, :a 2} {:v 12, :a 223} {:v 100, :a 23} {:v 1, :a 113}])

(defn multi-comp
  ([fns a b]
    (multi-comp fns < a b))
  ([[f & others :as fns] order a b]
    (if (seq fns)
      (let [result (compare (f a) (f b))
            f-result (if (= order >) (* -1 result) result)]
        (if (= 0 f-result)