minor fixes for on documentation strings code formatting

used a  more consice major mode check

based on a comment by @riscy the 
(string= (buffer-local-value 'major-mode (current-buffer)) "org-mode")
line is replaced by 
(eq major-mode 'org-mode)