                                                 (.set api "content.text"
                                                       qtipOrgCopyText)))))
             (.qtip "api"))]
-    (.click $urlShortenerInput get-url-evt-handler)
-    (.mouseenter $copy-to-clipboard get-url-evt-handler)
+    (.click $urlShortenerInput get-short-url-no-action)
+    (.mouseenter $copy-to-clipboard get-short-url-no-action)
     ; Change text of qtip when user clicks the copy-to-clipboard <button>
     (.on zcbClient "copy" (fn [] (.set qtipApi "content.text" "Copied!")))
     (qtip-for-sharing-button $share-via-email  "Share via Email")
     (qtip-for-sharing-button $share-via-twitter "Share via Twitter")
-    (.click $share-via-email
-            (get-short-url-jq-evt-handler-maker $urlShortenerInput
-                                                localStorage
-                                                :email))
-    (.click $share-via-twitter
-            (get-short-url-jq-evt-handler-maker $urlShortenerInput
-                                                localStorage
-                                                :twitter))))
+    (.click $share-via-email (get-short-url-evt-handler-maker :email))
+    (.click $share-via-twitter (get-short-url-evt-handler-maker :twitter))))
 
 ; Main entry point of the program
 (defn ^:export init [acad-year sem]

(defn- short-url-setup
  "Setup url shortening"
  []
  (let [ZeroClipboard       (aget js/window "ZeroClipboard")

        ; NOTE: This `ZeroClipboard.config` must be performed before we create
        ;       a new instance of ZeroClipboard.

                         (str "http://cdnjs.cloudflare.com/ajax/libs"
                              "/zeroclipboard/2.1.1/ZeroClipboard.swf")))

        $copy-to-clipboard      ($ :#copy-to-clipboard)
        ; setup the `copy shorturl` button
        localStorage            (aget js/window "localStorage")
        zcbClient               (ZeroClipboard. $copy-to-clipboard)
        $urlShortenerInput      ($ :#url-shortener)
        $share-via-email        ($ :#share-via-email)
        $share-via-twitter      ($ :#share-via-twitter)

        get-short-url-evt-handler-maker
        (get-short-url-jq-evt-handler-maker-maker $urlShortenerInput
                                                  localStorage)

        get-short-url-no-action (get-short-url-evt-handler-maker)
        qtipOrgCopyText         "Copy to Clipboard"

        qtipApi
        (-> $copy-to-clipboard
