;;; start-po.el --- autoload definitions for viewing and editing PO files ;; Copyright (C) 1995-2004, 2016, 2019 Free Software Foundation, Inc. ;; ;; This file is part of GNU gettext. ;; ;; GNU gettext is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation; either version 2, or (at your option) ;; any later version. ;; ;; GNU gettext is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, see ;; . ;;; Commentary: ;; This file provides a minimal amount of definitions that will autoload ;; the complete support for viewing and editing PO files when necessary. ;; It is meant to be installed in such a way that it will be part of the ;; dumped Emacs image, or loaded automatically when Emacs is started, ;; regardless how the user's .emacs looks like. ;;; Code: ;; For editing PO files. (autoload 'po-mode "po-mode" "Major mode for translators when they edit PO files. Special commands: \\{po-mode-map} Turning on PO mode calls the value of the variable 'po-mode-hook', if that value is non-nil. Behaviour may be adjusted through some variables, all reachable through 'M-x customize', in group 'Emacs.Editing.I18n.Po'." t) (setq auto-mode-alist (cons '("\\.po\\'\\|\\.po\\." . po-mode) auto-mode-alist)) ;; For viewing PO and POT files. ;; To use the right coding system automatically. (unless (fboundp 'po-find-file-coding-system) (autoload 'po-find-file-coding-system "po-compat" "\ Return a Mule (DECODING . ENCODING) pair, according to PO file charset. Called through file-coding-system-alist, before the file is visited for real.")) (modify-coding-system-alist 'file "\\.po[t]?\\'\\|\\.po\\." 'po-find-file-coding-system)