Skip to content

Commit

Permalink
Readme + uglifyjs
Browse files Browse the repository at this point in the history
  • Loading branch information
greenthepear committed Aug 11, 2024
1 parent 567beba commit f12afc8
Show file tree
Hide file tree
Showing 3 changed files with 12 additions and 5 deletions.
10 changes: 8 additions & 2 deletions README.md
Original file line number Diff line number Diff line change
@@ -1,10 +1,16 @@
**WeirdPal** is a web-app that makes writing parody songs easier by putting the old and new lyrics next to eachother and counting their syllables for matching the prosody.
**WeirdPal** is a web app for writing parody songs.

It shows the original and parody lines right next to each other and counts the syllables, all to make matching the flow and *prosody~* easier for you.

Made with **[Elm](https://elm-lang.org/)** because Elm is cool.

# Build

$ elm make src/Main.elm --output public/index.js

or just `./make.sh` and open `public/index.html`.
(or just run `make.sh` that has optimizations)

Open `public/index.html`.

# License
Under GPL-3.0 license, but that only goes for the software itself. Any song you make with this is all yours, but credit or a link to the website would be appreciated. 🙏
1 change: 1 addition & 0 deletions make.sh
Original file line number Diff line number Diff line change
@@ -1,2 +1,3 @@
#!/bin/bash
elm make src/Main.elm --optimize --output public/index.js
uglifyjs public/index.js --compress 'pure_funcs=[F2,F3,F4,F5,F6,F7,F8,F9,A2,A3,A4,A5,A6,A7,A8,A9],pure_getters,keep_fargs=false,unsafe_comps,unsafe' | uglifyjs --mangle --output public/index.js
6 changes: 3 additions & 3 deletions src/Main.elm
Original file line number Diff line number Diff line change
Expand Up @@ -199,13 +199,13 @@ makeSongLineDiv ln =
view : Model -> Html Msg
view model =
div containerStyle
[ div [ style "width" "60%" ]
[ div [ style "width" "60%", style "overflow-y" "scroll" ]
(Dict.values
model.content
|> List.map makeSongLineDiv
)
, div rightContainerStyle
[ div [ style "height" "95%" ]
[ div [ style "height" "95%", style "padding" "0% 2% 2% 2%" ]
[ p [] [ text "Original:" ]
, textarea
[ onInput ChangeOriginalFromMultiline
Expand All @@ -214,7 +214,7 @@ view model =
]
[]
]
, div [ style "height" "95%" ]
, div [ style "height" "95%", style "padding" "2% 2% 2% 2%" ]
[ p [] [ text "Changed:" ]
, textarea
[ onInput ChangeParodyFromMultiline
Expand Down

0 comments on commit f12afc8

Please sign in to comment.