Lines Matching defs:edit
37 ;; "Major mode for translators to edit PO files" t)
100 (defcustom po-auto-edit-with-msgid nil
105 (defcustom po-auto-fuzzy-on-edit nil
617 ;; temporary Emacs buffer used to edit the string. OVERLAY-INFO, when not
619 ;; markers) for this msgid string which became highlighted for the edit.
689 M-s Select reference C-c C-a Select file *M-l Add/edit translation
765 ["Edit msgstr" po-edit-msgstr
768 ["Ediff and merge msgstr" po-edit-msgstr-and-ediff
782 ["Edit comment" po-edit-comment
785 ["Ediff and merge comment" po-edit-comment-and-ediff
831 ["Add/edit translation" po-edit-lexicon-entry nil]
854 ["Edit out full" po-edit-out-full
856 '(:help "Leave PO mode to edit translation file using fundamental mode"))]
873 ["Abort edit" po-subedit-abort
876 ["Exit edit" po-subedit-exit
878 '(:help "Use this text as the translation and close current edit buffer"))])
882 (_"Type 'C-c C-c' once done, or 'C-c C-k' to abort edit")
883 "Message to post in the minibuffer when an edit buffer is displayed.")
977 (define-key po-mode-map "\C-m" 'po-edit-msgstr)
980 (define-key po-mode-map "#" 'po-edit-comment)
1006 (define-key po-mode-map "E" 'po-edit-out-full)
1023 (define-key po-mode-map "\C-c\C-e" 'po-edit-msgstr-and-ediff)
1024 (define-key po-mode-map [?\C-c?\C-#] 'po-edit-comment-and-ediff)
1025 (define-key po-mode-map "\C-c\C-C" 'po-edit-comment-and-ediff)
1029 ;;;; (define-key po-mode-map "\M-l" 'po-edit-lexicon-entry)
1038 "Major mode for translators when they edit PO files.
1554 "Use another window to edit msgstr reinitialized with msgid."
1892 (po-check-for-pending-edit po-start-of-msgid)
1893 (po-check-for-pending-edit po-start-of-msgstr))
1995 ;; In a string edit buffer, BACK-POINTER points to one of the slots of the
2002 "From EDITED-FIELDS, clean out any edit having a killed edit buffer."
2014 "Resume any pending edit. Return nil if some remains."
2025 (defun po-check-for-pending-edit (position)
2026 "Resume any pending edit at POSITION. Return nil if such edit exists."
2040 (defun po-edit-out-full ()
2044 (yes-or-no-p (_"Should I let you edit the whole PO file? ")))
2051 "Quit ediff and exit `recursive-edit'."
2054 (exit-recursive-edit))
2069 (recursive-edit)
2078 `po-subedit-ediff' calls `po-ediff-buffers-exit-recursive' to edit translation
2088 When done with the `ediff' session press \\[exit-recursive-edit] exit to
2089 `recursive-edit', or call \\[po-ediff-quit] (`Q') in the ediff control panel."
2137 (let* ((edit-buffer (current-buffer))
2148 (kill-buffer edit-buffer)
2168 po-auto-fuzzy-on-edit
2177 (defun po-edit-string (string type expand-tabs)
2184 (if (po-check-for-pending-edit marker)
2185 (let ((edit-buffer (generate-new-buffer
2187 (edit-coding buffer-file-coding-system)
2202 (setq slot (list marker edit-buffer overlay)
2204 (pop-to-buffer edit-buffer)
2208 (setq buffer-file-coding-system edit-coding)
2224 (defun po-edit-comment ()
2225 "Use another window to edit the current translator comment."
2228 (po-edit-string (po-get-comment nil) 'comment nil))
2230 (defun po-edit-comment-and-ediff ()
2231 "Use `ediff' to edit the current translator comment.
2232 This function calls `po-edit-msgstr' and `po-subedit-ediff'; for more info
2235 (po-edit-comment)
2238 (defun po-edit-msgstr ()
2239 "Use another window to edit the current msgstr."
2242 (po-edit-string (if (and po-auto-edit-with-msgid
2249 (defun po-edit-msgstr-and-ediff ()
2250 "Use `ediff' to edit the current msgstr.
2251 This function calls `po-edit-msgstr' and `po-subedit-ediff'; for more info
2254 (po-edit-msgstr)
2417 "Cycle auxiliary file, but from the translation edit buffer."