Skip to content

Instantly share code, notes, and snippets.

@benthepoet

benthepoet/Main.elm

Last active June 7, 2018 03:24
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save benthepoet/07ab0660e14c55ccf0c318c253fbdde8 to your computer and use it in GitHub Desktop.
Save benthepoet/07ab0660e14c55ccf0c318c253fbdde8 to your computer and use it in GitHub Desktop.
Download ZIP
Firebird Admin Layout
Raw
index.html
<html>
<head>
<style>
.container {
background-color: #eee !important;
}
.card > .section.card-header {
background-color: #cdc !important;
}
.header {
background-color: #016F90;
color: #efefef;
}
</style>
<link rel="stylesheet" href="https://unpkg.com/mini.css@3.0.0/dist/mini-default.min.css">
</head>
<body>
<main></main>
<script>
var app = Elm.Main.embed(document.querySelector('main'))
// you can use ports and stuff here
</script>
</body>
</html>
Raw
Main.elm
module Main exposing (main)
import Html exposing (Html)
import Html.Attributes as Attributes
main : Html msg
main =
Html.div [ Attributes.class "container" ]
[ Html.div [ Attributes.class "row header"]
[ Html.h2 [] [ Html.text "Firebird Admin" ]
]
, Html.div [ Attributes.class "row" ]
[ Html.div [ Attributes.class "card fluid col-sm-12" ]
[ Html.div [ Attributes.class "section card-header" ]
[ Html.h4 []
[ Html.text "Query Editor"
, Html.small [] [ Html.text "Press Ctrl-Enter to execute the statement" ]
]
]
, Html.div [ Attributes.class "section" ]
[ Html.textarea [] [] ]
]
, Html.div [ Attributes.class "card fluid col-sm-12 warning" ]
[ Html.div [ Attributes.class "section" ]
[ Html.text "There is a syntax error in the SQL statement."]
]
]
]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment