Changeset 112:7d4b23ccf144 for vstup/zdrojáky.xml

Timestamp:

07/06/12 13:41:35 (12 years ago)

Author:

František Kučera <franta-hg@…>

Branch:

default

Message:

#20 Skriptování: kód ke zvýraznění syntaxe generovaný skriptem

Files:

• vstup/zdrojáky.xml (modified) (2 diffs)

vstup/zdrojáky.xml

@@ -42 +42 @@
                 <h2>Java</h2>
 
-                <m:pre jazyk="java">public class Pokus {
-        // komentář
-        // &lt;JavaRulezz/&gt;
-}</m:pre>
+                <m:pre jazyk="java" src="../šablona/funkce/src/cz/frantovo/xmlWebGenerator/Xmlns.java"/>
 
                 <h2>XML</h2>
 
-                <m:pre jazyk="xml"><![CDATA[<xmlDokument>
-        <element1>toto je <strong>pěkné</strong> XML!!!</element1>
-</xmlDokument>]]></m:pre>
+                <p>
+                        Zdroják aktuální stránky – <abbr title="diakritika byla odstraněna, protože v Pygmentize je chyba – neumí značky s diakritikou, přestože to je platné XML">upravený</abbr> a zkrácený pomocí <m:a href="skriptování">skriptu</m:a>:
+                </p>
+                <m:pre jazyk="xml"><m:skript jazyk="bash">
+# V zvýrazňovači Pygmentize je chyba: nepodporuje znaky s diakritikou, přestože v daném jazyce můžou být.
+# TODO: opravit to tam (zřejmě špatný regulární výraz).
+
+cat $XWG_STRANKA_SOUBOR | iconv -t ASCII//TRANSLIT -f UTF-8 | head -n 8;
+echo -e "\t\t… zkráceno …";
+cat $XWG_STRANKA_SOUBOR | iconv -t ASCII//TRANSLIT -f UTF-8 | tail -n 4;
+
+# Případně:
+# cat $XWG_STRANKA_SOUBOR | sed s/á/a/g | sed s/ř/r/g | sed s/í/i/g | head -n 8;
+# echo -e "\t\t… zkráceno …";
+# cat $XWG_STRANKA_SOUBOR | sed s/á/a/g | sed s/ř/r/g | sed s/í/i/g | tail -n 4;
+                </m:skript></m:pre>
 
                 <p>Další ukázka XML: <m:a href="šablona/makra/tabulka.xsl" typ="zdroják" řádek="25">tabulka.xsl</m:a>.</p>
@@ -58 +68 @@
 
                 <m:pre jazyk="bash" src="matrixový-spořič.sh" odkaz="ano"/>
+
+                <h2>SQL</h2>
+
+                <p>
+                        Tento SQL kód není zapsán přímo ve stránce, ale byl vygenerován pomocí <m:a href="skriptování">skriptu</m:a>,
+                        a poté zvýrazněn.
+                </p>
+
+                <m:pre jazyk="sql"><m:skript jazyk="perl"><![CDATA[
+use strict;
+use warnings;
+
+for (my $i = 0; $i < 10; $i++) {
+        print "INSERT INTO tabulka VALUES ('abc $i', 'def ". $i*($i+1) . "', " . 2**$i . ");\n";
+}
+                ]]></m:skript></m:pre>
 
                 <h2>Chyby</h2>