Moved web root into root of project; this makes deployment easier.
Also deleted 'docs', which is now redundant.
This commit is contained in:
parent
a5204c66b9
commit
743d8a1740
1592 changed files with 53626 additions and 139250 deletions
35
js/compiled/out/devtools/reporter.cljs
Normal file
35
js/compiled/out/devtools/reporter.cljs
Normal file
|
|
@ -0,0 +1,35 @@
|
|||
(ns devtools.reporter
|
||||
(:require-macros [devtools.oops :refer [oget]])
|
||||
(:require [devtools.util :as util]
|
||||
[devtools.context :as context]))
|
||||
|
||||
(def issues-url "https://github.com/binaryage/cljs-devtools/issues")
|
||||
|
||||
; -- internal errors -------------------------------------------------------------------------------------------------------
|
||||
|
||||
(defn report-internal-error! [e & [context footer]]
|
||||
(let [console (context/get-console)]
|
||||
(try
|
||||
(let [message (if (instance? js/Error e)
|
||||
(or (.-message e) e)
|
||||
e)
|
||||
header #js ["%cCLJS DevTools Error%c%s"
|
||||
"background-color:red;color:white;font-weight:bold;padding:0px 3px;border-radius:2px;"
|
||||
"color:red"
|
||||
(str " " message)]
|
||||
context-msg (str "In " (util/get-lib-info) (if context (str ", " context ".") ".") "\n\n")
|
||||
footer-msg (if (some? footer)
|
||||
footer
|
||||
(str "\n\n" "---\n" "Please report the issue here: " issues-url))
|
||||
details #js [context-msg e footer-msg]]
|
||||
(let [group-collapsed (oget console "groupCollapsed")
|
||||
log (oget console "log")
|
||||
group-end (oget console "groupEnd")]
|
||||
(assert group-collapsed)
|
||||
(assert log)
|
||||
(assert group-end)
|
||||
(.apply group-collapsed console header)
|
||||
(.apply log console details)
|
||||
(.call group-end console)))
|
||||
(catch :default e
|
||||
(.error console "FATAL: report-internal-error! failed" e)))))
|
||||
Loading…
Add table
Add a link
Reference in a new issue