package Ġcom . e ok oe . s ag ui . features . sur veys . list Ċ Ċ import Ġcom . e ok oe . s ag ui . data . entities . Category Ċ import Ġcom . e ok oe . s ag ui . data . entities . Enterprise Ċ import Ġcom . e ok oe . s ag ui . data . model . S ag ui Model Ċ import Ġcom . e ok oe . s ag ui . features . base . Default Observer Ċ import Ġcom . e ok oe . s ag ui . features . base . presenter . Base Presenter Impl Ċ Ċ /** Ċ Ġ* Ġ@ author ĠPed ro ĠSil va Ċ Ġ* Ġ@ since Ġ 1 6 / 0 8 / 1 7 Ċ Ġ*/ Ċ class ĠCategories Presenter Ġconstructor ( private Ġval Ġsag ui Model : ĠS ag ui Model ) ĊĠĠĠ Ġ: ĠCategories Contract . Presenter , ĠBase Presenter Impl < Categories Contract . View >() Ġ{ ĊĊĠĠĠ Ġoverride Ġfun Ġlist ( enterprise : ĠEnterprise ) Ġ= ĊĠĠĠĠĠĠĠĠĠĠĠ Ġexec ( s ag ui Model . getC ategories ( enterprise ), ĠCategories Observer ()) ĊĊĠĠĠ Ġinner Ġclass ĠCategories Observer Ġ: ĠDefault Observer < List < Category >>( view ) Ġ{ ĊĠĠĠĠĠĠĠ Ġoverride Ġfun ĠonSuccess ( result : ĠList < Category > ?) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( result Ġ!= Ġnull ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġview ?. load ( result ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ }