Lines Matching +defs:find +defs:file
8 ;; This file is part of GNU Emacs.
21 ;; along with GNU Emacs; see the file COPYING. If not, write to the
110 ;; Look at the currently active keymaps and try to find
273 (find-file [?\C-x ?\C-f])
284 ;; C-x C-f Find file
285 ;; C-x C-s Save file
306 (find-file-other-window [?\C-x ?4 ?\C-f])
336 (tutorial--find-changed-keys
395 (defun tutorial--find-changed-keys (default-keys)
525 (let* ((changed-keys (tutorial--find-changed-keys
614 (expand-file-name "tutorial"
617 (defun tutorial--saved-file ()
619 (let ((file-name tutorial--lang)
620 (ext (file-name-extension tutorial--lang)))
623 (setq file-name (concat file-name ".tut")))
624 (expand-file-name file-name (tutorial--saved-dir))))
653 (tutorial--save-tutorial-to (tutorial--saved-file)))
657 (defun tutorial--save-tutorial-to (saved-file)
667 (unless (file-directory-p tutorial-dir)
674 (if (file-directory-p tutorial-dir)
705 (write-region nil nil saved-file)
708 saved-file
769 old-tut-file
799 (setq old-tut-file (file-exists-p (tutorial--saved-file)))
804 ;; Do not associate the tutorial buffer with a file. Instead use
806 (setq buffer-auto-save-file-name nil)
812 (setq old-tut-file nil))
813 (when old-tut-file
814 (setq old-tut-file
816 (if old-tut-file
818 (insert-file-contents (tutorial--saved-file))
833 (insert-file-contents (expand-file-name filename data-directory))
844 (if old-tut-file