You need to include the value of mode-line-process
in your custom mode line. This seems to work:
(setq my-modeline-major-mode
;; major modes
(list
'(:eval (propertize "%m" 'face 'font-lock-string-face
'help-echo buffer-file-coding-system))
'("" mode-line-process)))