Fixed raw text and lisp

src/components/CodeView.svelte

@@ -13,9 +13,7 @@
       {@html htmlContent}
     </div>
   {:else if isPlainText}
-    <div class="whitespace-pre-line h-full">
+    <pre class="h-full">{decompressed}</pre>
-      {decompressed}
-    </div>
   {:else}
     <pre class="h-full"><code>{@html htmlContent}</code></pre>
   {/if}

src/components/EditForm.svelte

@@ -44,12 +44,16 @@
 
   $: {
     if (editor) {
-      languages = CodeMirror.modeInfo
+      languages = (CodeMirror.modeInfo as unknown[])
-        .map((e: any) => ({
+        .map((e: any) => {
-          text: e.name,
+          let name = e.name
-          value: shorten(e.name),
+          if (name === 'Common Lisp') name = 'Lisp'
+          return {
+            text: name,
+            value: shorten(name),
             data: { mime: e.mime, mode: e.mode },
-        }))
+          }
+        })
         .filter((l: any) => l.value !== 'gflm') // Remove github flavored markdown, redundant with markdown
 
       selectedLanguage =