Browse files

interpret screen tag as program listing

  • Loading branch information...
1 parent a0244ac commit 85a2f84289ca9170511b09476fa2bfc4a990488c @apage43 committed Aug 6, 2013
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/throwdown/core.clj
@@ -89,7 +89,7 @@
(:table :informaltable)
(if (kill-table el) (clojure.core/println "Killing table!") (process-table el))
- :programlisting (merge (:attrs el)
+ (:screen :programlisting) (merge (:attrs el)
{:type :code
:code (el-text-raw el)})
@@ -112,7 +112,7 @@
; Could affix <span> classes to these if we wanted
(:guilabel :command :filename :literal :option :methodname
:replaceable :function :userinput :classname :guimenu :guibutton
- :guimenuitem :screen :superscript :firstterm)
+ :guimenuitem :superscript :firstterm)
(let [code (el-text el)
tag (:tag el)
inlineable? (not (or (.contains code "`")

0 comments on commit 85a2f84

Please sign in to comment.