fix model setting mode issue

[aylapear]

Bug was reported that the convergence was not displaying the same in the console as the app table. Determined it was due to when glance() was being called that it was not using the model mode settings that the bisonpictools::bpt_analyse() function was using which is what was causing the variation in the outputs.

Model mode now set manually in app and then reset back to the default using on.exit().

[joethorley]

This isn't a true reset in that it potentially leaves the users options altered - which can be very confusion.
A more robust method would save the current options and set those on exit.

[aylapear]

Waiting for embr::get_analysis_mode() to be written poissonconsulting/embr#74

[nehill197]

Used new embr::get_analysis_mode() function to reset current mb options on exit.
This ensures the glance output in the app uses the mb options of the analysis mode supplied to bpt_analyse(), to get the correct converged value.

[joethorley]

looks good assuming that input$model_type is the analysis mode?