Add autoload magic comments

diff --git a/gettext-tools/misc/po-compat.el b/gettext-tools/misc/po-compat.el
index e40a8d733ebea8bb3919d983ff942fc589421814..c41dbce6d98e55edcff26a5f16846dc15b6cdac9 100644 (file)
--- a/gettext-tools/misc/po-compat.el
+++ b/gettext-tools/misc/po-compat.el
@@ -179,6 +179,8 @@ Content-Type into a Mule coding system.")
              (if (re-search-forward charset-regexp nil t)
                  (match-string 1))))))
 
+;;;###autoload (autoload 'po-find-file-coding-system "po-compat")
+
 (eval-and-compile
   (if po-EMACS20
       (defun po-find-file-coding-system-guts (operation filename)

diff --git a/gettext-tools/misc/po-mode.el b/gettext-tools/misc/po-mode.el
index e33dce29fee4a918ff548d885e8f24187b54531b..07a5014c355e8136693d336e6c889781e57b6183 100644 (file)
--- a/gettext-tools/misc/po-mode.el
+++ b/gettext-tools/misc/po-mode.el
@@ -1171,6 +1171,7 @@ Initialize or replace current translation with the original message"))])
     po-mode-map)
   "Keymap for PO mode.")
 
+;;;###autoload
 (defun po-mode ()
   "Major mode for translators when they edit PO files.
 
@@ -3578,6 +3579,9 @@ strings remain."
               (save-buffer)
               (kill-buffer (current-buffer)))))))
 
+;;;###autoload (add-to-list 'auto-mode-alist '("\\.po[tx]?\\'\\|\\.po\\." . po-mode))
+;;;###autoload (modify-coding-system-alist 'file "\\.po[tx]?\\'\\|\\.po\\." 'po-find-file-coding-system)
+
 (provide 'po-mode)
 
 ;; Hey Emacs!