oakmac

ClojureScript Questions + Answers

A friend emailed me some questions related to ClojureScript for discussion. I thought these answers might be helpful in a public forum. -- C. Oakman, 27 Sep 2020

---

Do you serve your CLJS/html from CDN or from same domain as application server?

In general I serve static assets from the same domain as the application server.

oakmac

Instructions for non-technical users to assist with CheckForCorona.com translations

1. Create a GitHub account: https://github.com/join
2. Go to https://gist.github.com
3. In the Filename including extension... field, put your language name plus .edn.
   • example: ja.edn for Japanese
4. Copy this file into the main input area: https://raw.githubusercontent.com/LuminareMed/quickscreen-translations/master/en.edn
   • this is the latest English dictionary file
5. Click "Create public gist" button
6. You should see a page like: https://gist.github.com/YOUR_USERNAME/

oakmac

Keybase proof

I hereby claim:

• I am oakmac on github.
• I am oakmac (https://keybase.io/oakmac) on keybase.
• I have a public key ASBq3O96XUXHblMPchU-ST63SOPAvBVkY_7X1GubvsVLuwo

To claim this, I am signing this object:

oakmac

<script>
(function() {
  var useDevScript = (document.location.search.indexOf('devscript=true') !== -1);
  var src = useDevScript ? 'js/FULL-VERSION.js' : 'js/MINIFIED-VERSION.js';
  var scriptEl = document.createElement('script');
  scriptEl.type = 'text/javascript';
  scriptEl.src = src;
  var s = document.getElementsByTagName('script')[0];
  s.parentNode.insertBefore(scriptEl, s);
})();

oakmac

;; var aphrodite = require('aphrodite');
(def js-aphrodite (js/require "aphrodite"))

;; aphrodite.StyleSheet.extend([foo, bar]);
(defn aphrodite-extend [args]
  (apply (aget js-aphrodite "StyleSheet" "extend") args))

oakmac

use std::collections::HashMap;

static PARENS: HashMap = HashMap::new();
PARENS.insert("{", "}");
PARENS.insert("}", "{");
PARENS.insert("[", "]");
PARENS.insert("]", "[");
PARENS.insert("(", ")");
PARENS.insert(")", "(");

oakmac

static PARENS: HashMap = HashMap::new();

fn set_parens() {
    PARENS.insert("{", "}");
    PARENS.insert("}", "{");
    PARENS.insert("[", "]");
    PARENS.insert("]", "[");
    PARENS.insert("(", ")");
    PARENS.insert(")", "(");
}

oakmac

diff --git a/parinferlib.el b/parinferlib.el
index f5ddd7d..fa694fb 100644
--- a/parinferlib.el
+++ b/parinferlib.el
@@ -627,15 +627,14 @@
 (defun parinferlib--init-indent (result)
   (let ((mode (gethash :mode result))
         (in-str? (gethash :isInStr result)))
-    (case mode
-      ((:indent)

oakmac

;; JS:
;; $('html,body').animate({ scrollTop: element.offset().top }, 'slow');

(def $ js/jQuery)

(let [js-anim-dest (js-obj "scrollTop" (aget (.offset element) "top"))])
  (.animate ($ "html,body") js-anim-dest "slow")
 

oakmac

(let [a (:a my-map)
      b (:b my-map)
      c (:c my-map)]
  (do-a-thing a b c))