A lot of important government documents are created and saved in Microsoft Word (*.docx). But Microsoft Word is a proprietary format, and it's not really useful for presenting documents on the web. So, I wanted to find a way to convert a .docx file into markdown.
On a mac you can use homebrew by running the command brew install pandoc.
| #!/bin/bash | |
| # from | |
| # http://bergamini.org/computers/creating-favicon.ico-icon-files-with-imagemagick-convert.html | |
| convert source-WxW.png -resize 256x256 -transparent white favicon-256.png | |
| convert favicon-256.png -resize 16x16 favicon-16.png | |
| convert favicon-256.png -resize 32x32 favicon-32.png | |
| convert favicon-256.png -resize 64x64 favicon-64.png | |
| convert favicon-256.png -resize 128x128 favicon-128.png |
Start up the new cljs.main with Node:
clj -Sdeps '{:deps {org.clojurescript {:git/url "https://github.com/clojure/clojurescript" :sha "3f4084efcb5cd92cceb8ca30765144691d8cfd7e"}}}' -m cljs.main -re node
The above works by specifying ClojureScript as a "git dep" and you can ensure that you are running the very latest by replacing the
:shavalue with the latest commit SHA at https://github.com/clojure/clojurescript.
First, a few dependencies:
| 'use strict'; | |
| exports.handler = (event, context, callback) => { | |
| // Get request and request headers | |
| const request = event.Records[0].cf.request; | |
| const headers = request.headers; | |
| // Configure authentication | |
| const authUser = 'user'; | |
| const authPass = 'pass'; |
| (ns general.replace | |
| (:require [clojure.string :as s] | |
| [clojure.java.io :as io] | |
| [clojure.pprint :as pp])) | |
| (defn indexes-of [in-str find-str] | |
| (loop [idx 0 | |
| indexes []] | |
| (let [found-idx (s/index-of in-str find-str idx)] | |
| (if found-idx |
| (ns data-portal.client | |
| (:require [om.next :as om] | |
| [fulcro.client.core :as uc] | |
| [data-portal.ui.html5-routing :as routing] | |
| [data-portal.ui.root :as root] | |
| [fulcro.client.logging :as log] | |
| [data-portal.api.core :refer [make-rest-network]])) | |
| (defonce app | |
| (atom (uc/new-fulcro-client |
| (ns om.next.spec | |
| (:require [cljs.spec.alpha :as s])) | |
| (s/def ::ident (s/and vector? (s/cat :ident keyword? :value #(not (coll? %))))) | |
| (s/def ::join-key (s/or :prop keyword? :ident ::ident)) | |
| (s/def ::join (s/and (s/map-of ::join-key ::query) #(= (count %) 1))) | |
| (s/def ::union (s/and (s/map-of keyword? ::query) #(> (count %) 1))) | |
| (s/def ::param-expr | |
| (s/cat :query-expr ::query-expr |
| (ns data-portal.specs.bbox | |
| (:require [clojure.spec.alpha :as s])) | |
| (s/def :geo/latitude (s/and number? #(<= -90 % 90))) | |
| (s/def :geo/longitude (s/and number? #(<= -180 % 360))) | |
| (s/def :geo/north :geo/latitude) | |
| (s/def :geo/south :geo/latitude) | |
| (s/def :geo/east :geo/longitude) | |
| (s/def :geo/west :geo/longitude) |
| static om/IQuery | |
| (query [this] [{:panels {:panelA [:boo], :panelB [:goo], :panelC [:sticky]}} | |
| {[:panelB 1] [*]} | |
| {[:current-panel _] [*]}]) |