Commit 79c89ab9 authored by Daniel Kochmański's avatar Daniel Kochmański

Merge branch 'screenshot-changes' into 'master'

Screenshot changes and other minor improvements

See merge request !1
parents c5f4d072 948738bb
## McCLIM website management ##
McCLIM uses the
......@@ -11,7 +10,7 @@ generator.
### Adding content ###
To add a news entry you have to clone the repository and add to the
directory `posts/` the file (in markdown with with an extra header):
directory `posts/` the file (in markdown with an extra header):
```markdown
;;;;;
......@@ -46,24 +45,24 @@ Additionally, if you want to create this website entry on the
navigation bar, you need to edit the `.coleslawrc` file's section
`:sitenav` (the section is self-explanatory).
If you want to modify existing page or news just edit the file and
commit changes.
If you want to modify an existing page or news item just edit the file
and commit all changes.
### Adding files not suitable for git ###
GIT isn't well suite for hosting big files. To add new files "heavy"
files to the website put them in the `/project/mcclim/files` directory
– on deployment all files in it will be put in the `static/files`
website's relative path.
GIT isn't well suite for hosting big files. To add new "heavy" files
to the website put them in the `/project/mcclim/files` directory – on
deployment all files in it will be put in the `static/files` website's
relative path.
Smaller files which belong to the repository may should added to the
Smaller files which belong to the repository should be added to the
`static/` directory (any subdirectory will be fine except `files/`,
which is listed in `.gitignore` and reserved for big files on the host
system.
### Deployment ###
After modifying the website commit the change and push it to the
After modifying the website, commit the change and push it to the
repository. After that login to your common-lisp.net shell account and
run the script:
......
;;;;;
title: Development
url: involve
;;;;;
......
;;;;;
title: Excite
url: excite.html
format: cl-who
;;;;;
......@@ -27,74 +28,61 @@ format: cl-who
"Robert Strandth" "https://groups.google.com/forum/message/raw?msg=comp.lang.lisp/ssavqUHI3lw/I9iY_jMuGfcJ")
(make-quote "McCLIM, the stuff that really boring dreams are made of."
"Andy Hefner" "https://common-lisp.net/project/mcclim/static/media/screenshots/GvziAwP.png")
(make-quote "Some people swear it is the best thing since sliced bread, and some people think sliced bread is better for building GUIs than it is."
"Nikodemus Siivola" "http://random-state.net/files/nikodemus-cl-faq.html#is-there-a-gui")
(:h2 "Screenshots")
(:h3 "Applications bundled with McCLIM")
(:center
(make-screenshot ("Lisp Listener" "https://common-lisp.net/project/mcclim/static/manual/mcclim.html#Listener")
("Lisp Listener Screenshot"
"static/media/screenshots/bundled/listener1-small.jpg"
"static/media/screenshots/bundled/listener1.jpg"))
(make-screenshot ("Debugger" "https://common-lisp.net/project/mcclim/static/manual/mcclim.html#Debugger")
("Debugger Screenshot"
"static/media/screenshots/bundled/debugger-small.png"
"static/media/screenshots/bundled/debugger.png"))
(make-screenshot ("Inspector" "https://common-lisp.net/project/mcclim/static/manual/mcclim.html#Inspector")
("Inspector Screenshot"
"static/media/screenshots/bundled/inspector-small.png"
"static/media/screenshots/bundled/inspector.png"))
(make-screenshot ("Logic Cube")
("Logic Cube Game"
"static/media/screenshots/bundled/logic-cube-small.png"
"static/media/screenshots/bundled/logic-cube.png")))
(:h3 "Screenshots of publicly available applications"
(:center
(make-screenshot ("Gsharp" "http://dept-info.labri.fr/~strandh/Projects/Gsharp/")
("Gsharp Screenshot"
"static/media/screenshots/publicly-available/bach262-small.jpg"
"static/media/screenshots/publicly-available/bach262.jpg"))
(make-screenshot ("TransClime" "https://github.com/robert-strandh/TransClime")
("TransClime Screenshot"
"static/media/screenshots/publicly-available/transclime-small.png"
"static/media/screenshots/publicly-available/transclime.png"))
(make-screenshot ("Flamegraph Viewer" "https://github.com/scymtym/clim.flamegraph")
("Flamegraph Viewer Screenshot"
"static/media/screenshots/publicly-available/clim.flamegraph-small.png"
"static/media/screenshots/publicly-available/clim.flamegraph.png"))))
(:h3 "Screenshots submitted by McCLIM users")
"Note that the following screenshots may depict software that is not publicly available."
(:center
(make-screenshot ("Gsharp" "http://dept-info.labri.fr/~strandh/Projects/Gsharp/")
("Gsharp screenshot"
"static/media/screenshots/bach262-small.jpg"
"static/media/screenshots/bach262.jpg"))
(make-screenshot ("Lisp Listener")
("Lisp Listener screenshot"
"static/media/screenshots/listener1-small.jpg"
"static/media/screenshots/listener1.jpg"))
(make-screenshot ("TransClime" "https://github.com/robert-strandh/TransClime")
("TransClime screenshot"
"static/media/screenshots/transclime-small.png"
"static/media/screenshots/transclime.png"))
(dolist (cap '((#P"static/media/screenshots/0UanxYJ-small.png"
#P"static/media/screenshots/0UanxYJ.png")
(#P"static/media/screenshots/16GtQgU-small.png"
#P"static/media/screenshots/16GtQgU.png")
(#P"static/media/screenshots/1bXLaMM-small.png"
#P"static/media/screenshots/1bXLaMM.png")
(#P"static/media/screenshots/1vcCILs-small.png"
#P"static/media/screenshots/1vcCILs.png")
(#P"static/media/screenshots/2eL0LhQ-small.png"
#P"static/media/screenshots/2eL0LhQ.png")
(#P"static/media/screenshots/6Y42q4t-small.png"
#P"static/media/screenshots/6Y42q4t.png")
(#P"static/media/screenshots/7G9BTn9-small.png"
#P"static/media/screenshots/7G9BTn9.png")
(#P"static/media/screenshots/FseU6K5-small.png"
#P"static/media/screenshots/FseU6K5.png")
(#P"static/media/screenshots/GvziAwP-small.png"
#P"static/media/screenshots/GvziAwP.png")
(#P"static/media/screenshots/HJOgs7G-small.png"
#P"static/media/screenshots/HJOgs7G.png")
(#P"static/media/screenshots/Ius6a3h-small.png"
#P"static/media/screenshots/Ius6a3h.png")
(#P"static/media/screenshots/PKlAYtZ-small.png"
#P"static/media/screenshots/PKlAYtZ.png")
(#P"static/media/screenshots/PlTDdut-small.png"
#P"static/media/screenshots/PlTDdut.png")
(#P"static/media/screenshots/VCQftAd-small.png"
#P"static/media/screenshots/VCQftAd.png")
(#P"static/media/screenshots/XBgJbBH-small.png"
#P"static/media/screenshots/XBgJbBH.png")
(#P"static/media/screenshots/ZISVoOa-small.png"
#P"static/media/screenshots/ZISVoOa.png")
(#P"static/media/screenshots/aCOklQk-small.png"
#P"static/media/screenshots/aCOklQk.png")
(#P"static/media/screenshots/eAelY4L-small.png"
#P"static/media/screenshots/eAelY4L.png")
(#P"static/media/screenshots/eQI0x9n-small.png"
#P"static/media/screenshots/eQI0x9n.png")
(#P"static/media/screenshots/exAj9iR-small.png"
#P"static/media/screenshots/exAj9iR.png")
(#P"static/media/screenshots/fFRQ9r8-small.png"
#P"static/media/screenshots/fFRQ9r8.png")
(#P"static/media/screenshots/kS21tV3-small.png"
#P"static/media/screenshots/kS21tV3.png")
(#P"static/media/screenshots/u68N7VD-small.png"
#P"static/media/screenshots/u68N7VD.png")
(#P"static/media/screenshots/uZ8b71Z-small.png"
#P"static/media/screenshots/uZ8b71Z.png")
(#P"static/media/screenshots/xqucMTs-small.png"
#P"static/media/screenshots/xqucMTs.png")
(#P"static/media/screenshots/z3VCvuD-small.png"
#P"static/media/screenshots/z3VCvuD.png")))
(make-screenshot () ("screenshot" (car cap) (cadr cap)))))))
(dolist (name '("0UanxYJ" "16GtQgU" "1bXLaMM" "1vcCILs" "2eL0LhQ"
"6Y42q4t" "7G9BTn9" "GvziAwP" "HJOgs7G" "Ius6a3h"
"PKlAYtZ" "PlTDdut" "VCQftAd" "XBgJbBH" "ZISVoOa"
"aCOklQk" "eAelY4L" "eQI0x9n" "exAj9iR" "fFRQ9r8"
"kS21tV3" "u68N7VD" "uZ8b71Z" "xqucMTs" "z3VCvuD"))
(let ((directory '(:relative "static" "media" "screenshots"))
(small-name (format nil "~A-small" name)))
(make-screenshot ()
("screenshot"
(make-pathname :name small-name :type "png" :directory directory)
(make-pathname :name name :type "png" :directory directory))))))))
#+ (or)
(defun convert-to-png ((directory #P"/home/jack/Desktop/vintage-digital/"))
......
;;;;;
title: McCLIM
url: main.html
;;;;;
......@@ -10,12 +11,14 @@ a powerful toolkit for writing GUIs in Common Lisp. It is licensed
under the
[GNU Library General Public License](https://opensource.org/licenses/lgpl-2.1.php).
You can access the
[McCLIM manual draft PDF](static/documents/mcclim.pdf) if you want,
but it's still a work in progress. To reach the developers you may
either write to the
You can access the McCLIM manual draft in
[PDF](static/documents/mcclim.pdf) and
[HTML](static/manual/mcclim.html) form if you want, but it's still
a work in progress. To reach the developers you may either write to
the
[mailing list](https://mailman.common-lisp.net/listinfo/mcclim-devel)
or on the [#clim](http://webchat.freenode.net/?channels=clim) irc channel.
or on the [#clim](http://webchat.freenode.net/?channels=clim) IRC
channel.
## Features ##
......@@ -94,6 +97,7 @@ world. Contributors past and present include:
* Brian Mastenbrook
* Mike McDonald
* Timothy Moore
* Jan Moringen
* Elias Mårtenson
* Edena Pixel
* Max-Gerd Retzlaff
......
This source diff could not be displayed because it is too large. You can view the blob instead.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment