           (string-equal "localhost" emdocs-ip-addr))
       (emdocs-attach-sockets-to-buffer (current-buffer) emdocs-ip-addr)
     (message
-"Invalid ip address. Keep in mind emdocs only works for private ip addresses.")
+     (concat
+      "Invalid ip address. "
+      "Keep in mind emdocs only works for private ip addresses."))
     (setq emdocs-mode nil)))
 
 (defun emdocs-test-if-client-attached-to-buffer (client)

;;; interactives
(defun emdocs-kill-server ()
  "docstring"
  (interactive)
  (if (and *emdocs-server*
           (not (eq (process-status *emdocs-server*) 'closed)))
      (delete-process *emdocs-server*))

                                 buffer beg end prev-length))))
                (setq-local after-change-functions
                            (cons emdocs-after-change-lambda
                                  after-change-functions))
                (add-hook 'kill-buffer-hook #'emdocs-disconnect)
                (add-hook 'kill-emacs-hook #'emdocs-kill-server)))))
      (message "Not connected to internet: exiting.")
      (setq emdocs-mode nil)
      (emdocs-disconnect))))
