kumarshantanu

{
  "basics": {
    "name": "Thomas Edison",
    "label": "Inventor and Businessman",
    "picture": "https://example.com/photo.jpg",
    "email": "[email protected]",
    "phone": "(123) 456-7890",
    "website": "https://thomasedison.com",
    "summary": "Prolific inventor and businessman known for developing many devices that greatly influenced life around the world, including the phonograph, the motion picture camera, and the electric light bulb.",
    "location": {

kumarshantanu

{
  "basics": {
    "name": "Thomas Edison",
    "label": "Inventor and Businessman",
    "picture": "https://example.com/photo.jpg",
    "email": "[email protected]",
    "phone": "(123) 456-7890",
    "website": "https://thomasedison.com",
    "summary": "Prolific inventor and businessman known for developing many devices that greatly influenced life around the world, including the phonograph, the motion picture camera, and the electric light bulb.",
    "location": {

kumarshantanu

Keybase proof

I hereby claim:

• I am kumarshantanu on github.
• I am kumarshantanu (https://keybase.io/kumarshantanu) on keybase.
• I have a public key ASA0DqamW6PQjQyl_-bJHXrfpaCtJQkjYl6l02334oNRZQo

To claim this, I am signing this object:

kumarshantanu

==> Downloading http://dl.rust-lang.org/dist/rust-0.2.tar.gz
Already downloaded: /Users/shantanu/Library/Caches/Homebrew/rust-0.2.tar.gz
/usr/bin/tar xf /Users/shantanu/Library/Caches/Homebrew/rust-0.2.tar.gz
==> ./configure --prefix=/usr/local/Cellar/rust/0.2
./configure --prefix=/usr/local/Cellar/rust/0.2
configure: looking for configure programs
configure: found cmp
configure: found mkdir
configure: found printf
configure: found cut

kumarshantanu

This file contains any messages produced by compilers while
running configure, to aid debugging if configure makes a mistake.

It was created by configure, which was
generated by GNU Autoconf 2.65.  Invocation command line was

  $ ./configure --disable-debug --disable-dependency-tracking --prefix=/usr/local/Cellar/beanstalk/1.4.6 --with-event=/usr/local

## --------- ##
## Platform. ##

kumarshantanu

(ns example.flash
  (:use compojure.core)
  (:use ring.util.response)
  (:use ring.middleware.session)
  (:use ring.middleware.flash)
  (:require [compojure.route :as route]))

(defn show-new [flash]
  (str "Flash: " flash
    "<br/>

kumarshantanu

(in-txn db
  (let [e (find-by-id blog-entry-meta 3)
        r ((find-rels e entry-comment-meta) e)
        c (first r)]
    (println "** Deleting comment **")
    (delete c)
    (println "** Deleting entry-comment graph **")
    (delete-cascade e)))

kumarshantanu

(in-db db
  (let [e (find-by-id blog-entry-meta 2)
        r ((find-rels e entry-comment-meta) e)
        c (first r)
        s (find-siblings c e)
        sc (find-siblings c e :cols [:content :name :email])
        sw (find-siblings c e :where ["name LIKE ?" "Phi%"])
        sb (find-siblings c e :cols [:content :name :email] :where ["name LIKE ?" "Phi%"])]
    (ppe "\nChild: " c)
    (ppe "\nSiblings:" s)

kumarshantanu

(in-db db
  (let [e (find-by-id blog-entry-meta 2)
        r ((find-rels e entry-comment-meta) e)
        rc ((find-rels e entry-comment-meta :cols [:content :name :email]) e)
        rw ((find-rels e entry-comment-meta :where ["email=?" "[email protected]"]) e)
        rb ((find-rels e entry-comment-meta :cols [:content :name :email]
             :where ["email=?" "[email protected]"]) e)]
    (ppe "\nEntry:" e)
    (ppe "\nRelations:" r)
    (ppe "\nRelations with selected columns:" rc)

kumarshantanu

(in-txn db
  (let [e (find-by-id blog-entry-meta 1)
        c (EntryComment. {}
            {:content "Comment #1"
             :whenposted (new java.util.Date)
             :name "Whatever"
             :email "[email protected]"} )
        saved (save-deps e [c])]
    (ppe "Saved 1 child for entry (ID=1)" saved))
  (let [e (find-by-id blog-entry-meta 2)