anchor.diff:                                       ClassName "form-control"
                                        Placeholder "Please insert authors"
                                        Required true
  -                                     OnChange (fun (ev:React.FormEvent) -> dispatch (AuthorsChanged !!ev.target?value))]
  +                                     OnChange (fun ev -> dispatch (AuthorsChanged ev.Value))]
                                match model.AuthorsErrorText with
                                | Some e -> yield span [ClassName "glyphicon glyphicon-remove form-control-feedback"] []
                                | _ -> ()
  
positive.code:                                     ClassName "form-control"
                                      Placeholder "Please insert link"
                                      Required true
                                      OnChange (fun (ev:React.FormEvent) -> dispatch (LinkChanged !!ev.target?value))]
                               match model.LinkErrorText with
                               | Some e -> yield span [ClassName "glyphicon glyphicon-remove form-control-feedback"] []
                               | _ -> ()
  
negative.code:                                      ClassName "form-control"
                                       Placeholder "Please insert book title"
                                       Required true
                                       OnChange (fun ev -> dispatch (TitleChanged ev.Value)) ]
                               match model.TitleErrorText with
                               | Some e -> yield span [ClassName "glyphicon glyphicon-remove form-control-feedback"] []
                               | _ -> ()
  