haxala1r/paste
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Changes to the UI, deleted the testing leftover bin

Browse Source
This commit is contained in:
Emin Arslan 2025-03-29 22:32:47 +03:00
parent d2144c7f5e
commit e41e0888fa
5 changed files with 19 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitignore vendored
View File

@ -1,2 +1,3 @@
*~ *~
*.fasl *.fasl
bin/*

1
bin/6625c400-0ccf-11f0-8230-eb390952483c
View File

@ -1 +0,0 @@
hello world!!!!

5
main.lisp
View File

@ -8,7 +8,10 @@
;;;; if you're gonna run a public instance, change to the url other people ;;;; if you're gonna run a public instance, change to the url other people
;;;; will use to connect! ;;;; will use to connect!
(defvar *server-external-address* "http://localhost:8080/") (defvar *server-external-address*
"http://localhost:8080/"
;;"https://paste.emin.software/"
)
(defvar *server* nil) (defvar *server* nil)
;; we probably don't actually need a template for the root, ;; we probably don't actually need a template for the root,

4
paste.html
View File

@ -3,7 +3,7 @@
<title> bin </title> <title> bin </title>
<style> <style>
html { html {
background-color: black; background-color: #4E5A52;
color: #FFFDD0; color: #FFFDD0;
} }
body { body {
@ -12,6 +12,7 @@
} }
code { code {
margin: 0; margin: 0;
padding: 5px;
font-family: monospace; font-family: monospace;
} }
div { div {
@ -39,6 +40,7 @@
<a href="{{link-raw}}"> raw </a> <a href="{{link-raw}}"> raw </a>
<br /> <br />
</main> </main>
<br />
<div> <div>
<pre><code>{{ contents }}</code></pre> <pre><code>{{ contents }}</code></pre>
</div> </div>

17
root.html
View File

@ -3,7 +3,7 @@
<title>lispy pasty thingy</title> <title>lispy pasty thingy</title>
<style> <style>
html { html {
background-color: black; background-color: #4E5A52;
color: #FFFDD0; color: #FFFDD0;
} }
body { body {
@ -16,12 +16,13 @@
} }
div { div {
border: 3px solid #FFFDD0; border: 3px solid #FFFDD0;
padding: 2px; padding: 0px;
border-radius: 5px; border-radius: 5px;
width: 80%; width: 80%;
margin: auto; margin: auto;
} }
/*
form { form {
border: 3px solid #FFFDD0; border: 3px solid #FFFDD0;
padding: 2px; padding: 2px;
@ -30,19 +31,23 @@
width: 80%; width: 80%;
margin-left: auto; margin-left: auto;
margin-right: auto; margin-right: auto;
} }*/
</style> </style>
</head> </head>
<body> <body>
<div> <div>
<h1> Lispy paste </h1> <p> This is a simple pastebin-like web app written in Common Lisp.
</div> Simply type something into the box below, submit, and share the link
with your friends.
<br>
Pastes are anonymous, no authentication is needed.</p>
<form method="post" action="/new"> <form method="post" action="/new">
<p> New Paste: </p>
<textarea name="content" rows="7" cols="50"></textarea> <br /> <textarea name="content" rows="7" cols="50"></textarea> <br />
<input type="submit" value="Submit"> <input type="submit" value="Submit">
</form> </form>
</div>
</body> </body>
</html> </html>