make things pretty

This commit is contained in:
pena 2022-02-18 02:39:25 +01:00 committed by Swrup
parent 5b1aac5769
commit cb9bd385dd
4 changed files with 61 additions and 44 deletions

View file

@ -1,16 +1,19 @@
let f nick bio request =
<%s Format.sprintf "Hello %s !" nick %>
<%s! Dream.form_tag ~action:"/profile" request %>
<div class="mb-3">
<label for="bio" class="form-label">Bio</label>
<textarea name="bio" type="text" class="form-control" id="bio" aria-describedby="bioHelp"><%s bio %></textarea>
<div id="bioHelp" class="form-text">Who are you?</div>
</div>
<button type="submit" class="btn btn-primary">Save</button>
</form>
<img src="/user/<%s nick %>/avatar" class="img-thumbnail" alt="Your avatar picture">
<%s! Dream.form_tag ~action:"/profile" ~enctype:`Multipart_form_data request %>
<input name="file" type="file">
<button>Submit!</button>
</form>
<h1><%s Format.sprintf "Hello %s !" nick %></h1>
<%s! Dream.form_tag ~action:"/profile" request %>
<div class="mb-3">
<label for="bio" class="form-label">Bio</label>
<textarea name="bio" type="text" class="form-control" id="bio" aria-describedby="bioHelp"><%s bio %></textarea>
<div id="bioHelp" class="form-text">Who are you?</div>
</div>
<button type="submit" class="btn btn-primary">Save</button>
</form>
<br />
<img src="/user/<%s nick %>/avatar" class="img-thumbnail" alt="Your avatar picture" />
<br />
<br />
<%s! Dream.form_tag ~action:"/profile" ~enctype:`Multipart_form_data request %>
<input name="file" type="file"><br />
<br />
<button class="btn btn-primary">Submit picture!</button>
</form>