diff options
| author | Eli Zaretskii | 2013-05-25 10:19:50 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2013-05-25 10:19:50 +0300 |
| commit | a052ef3bef1bc3e461cceeb3d6ed66cababa2449 (patch) | |
| tree | 8517e5ff961deec09ce072b6d97b8ae41427a9ab /lisp | |
| parent | df76dacbd1f6830c96cf63053efe776d40c0e84d (diff) | |
| download | emacs-a052ef3bef1bc3e461cceeb3d6ed66cababa2449.tar.gz emacs-a052ef3bef1bc3e461cceeb3d6ed66cababa2449.zip | |
Rename reveal-filename into unmsys--filename.
lisp/subr.el (unmsys--filename): Renamed from reveal-filename.
lisp/Makefile.in (custom-deps, finder-data, autoloads)
($(MH_E_DIR)/mh-loaddefs.el, $(TRAMP_DIR)/tramp-loaddefs.el)
($(CAL_DIR)/cal-loaddefs.el, $(CAL_DIR)/diary-loaddefs.el)
($(CAL_DIR)/hol-loaddefs.el): All users changed.
leim/Makefile.in (leim-list.el, check-declare): Replace
reveal-filename with unmsys--filename.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 9 | ||||
| -rw-r--r-- | lisp/Makefile.in | 16 | ||||
| -rw-r--r-- | lisp/subr.el | 6 |
3 files changed, 20 insertions, 11 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index efa6f06cbb1..f9eaf71aad4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,12 @@ | |||
| 1 | 2013-05-25 Eli Zaretskii <eliz@gnu.org> | ||
| 2 | |||
| 3 | * subr.el (unmsys--filename): Renamed from reveal-filename. | ||
| 4 | |||
| 5 | * Makefile.in (custom-deps, finder-data, autoloads) | ||
| 6 | ($(MH_E_DIR)/mh-loaddefs.el, $(TRAMP_DIR)/tramp-loaddefs.el) | ||
| 7 | ($(CAL_DIR)/cal-loaddefs.el, $(CAL_DIR)/diary-loaddefs.el) | ||
| 8 | ($(CAL_DIR)/hol-loaddefs.el): All users changed. | ||
| 9 | |||
| 1 | 2013-05-25 Stefan Monnier <monnier@iro.umontreal.ca> | 10 | 2013-05-25 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 11 | ||
| 3 | * emacs-lisp/lisp.el (lisp-completion-at-point): Don't use | 12 | * emacs-lisp/lisp.el (lisp-completion-at-point): Don't use |
diff --git a/lisp/Makefile.in b/lisp/Makefile.in index 138ad5abfa6..741f785429d 100644 --- a/lisp/Makefile.in +++ b/lisp/Makefile.in | |||
| @@ -164,21 +164,21 @@ $(lisp)/cus-load.el: | |||
| 164 | custom-deps: doit | 164 | custom-deps: doit |
| 165 | cd $(lisp); $(setwins_almost); \ | 165 | cd $(lisp); $(setwins_almost); \ |
| 166 | echo Directories: $$wins; \ | 166 | echo Directories: $$wins; \ |
| 167 | $(emacs) -l cus-dep --eval '(setq generated-custom-dependencies-file (reveal-filename "$(lisp)/cus-load.el"))' -f custom-make-dependencies $$wins | 167 | $(emacs) -l cus-dep --eval '(setq generated-custom-dependencies-file (unmsys--filename "$(lisp)/cus-load.el"))' -f custom-make-dependencies $$wins |
| 168 | 168 | ||
| 169 | $(lisp)/finder-inf.el: | 169 | $(lisp)/finder-inf.el: |
| 170 | $(MAKE) $(MFLAGS) finder-data | 170 | $(MAKE) $(MFLAGS) finder-data |
| 171 | finder-data: doit | 171 | finder-data: doit |
| 172 | cd $(lisp); $(setwins_almost); \ | 172 | cd $(lisp); $(setwins_almost); \ |
| 173 | echo Directories: $$wins; \ | 173 | echo Directories: $$wins; \ |
| 174 | $(emacs) -l finder --eval '(setq generated-finder-keywords-file (reveal-filename "$(lisp)/finder-inf.el"))' -f finder-compile-keywords-make-dist $$wins | 174 | $(emacs) -l finder --eval '(setq generated-finder-keywords-file (unmsys--filename "$(lisp)/finder-inf.el"))' -f finder-compile-keywords-make-dist $$wins |
| 175 | 175 | ||
| 176 | # The chmod +w is to handle env var CVSREAD=1. | 176 | # The chmod +w is to handle env var CVSREAD=1. |
| 177 | autoloads: $(LOADDEFS) doit | 177 | autoloads: $(LOADDEFS) doit |
| 178 | cd $(lisp) && chmod +w $(AUTOGEN_VCS) | 178 | cd $(lisp) && chmod +w $(AUTOGEN_VCS) |
| 179 | cd $(lisp); $(setwins_almost); \ | 179 | cd $(lisp); $(setwins_almost); \ |
| 180 | echo Directories: $$wins; \ | 180 | echo Directories: $$wins; \ |
| 181 | $(emacs) -l autoload --eval '(setq generated-autoload-file (reveal-filename "$(lisp)/loaddefs.el"))' -f batch-update-autoloads $$wins | 181 | $(emacs) -l autoload --eval '(setq generated-autoload-file (unmsys--filename "$(lisp)/loaddefs.el"))' -f batch-update-autoloads $$wins |
| 182 | 182 | ||
| 183 | # This is required by the bootstrap-emacs target in ../src/Makefile, so | 183 | # This is required by the bootstrap-emacs target in ../src/Makefile, so |
| 184 | # we know that if we have an emacs executable, we also have a subdirs.el. | 184 | # we know that if we have an emacs executable, we also have a subdirs.el. |
| @@ -373,7 +373,7 @@ mh-autoloads: $(MH_E_DIR)/mh-loaddefs.el | |||
| 373 | $(MH_E_DIR)/mh-loaddefs.el: $(MH_E_SRC) | 373 | $(MH_E_DIR)/mh-loaddefs.el: $(MH_E_SRC) |
| 374 | $(emacs) -l autoload \ | 374 | $(emacs) -l autoload \ |
| 375 | --eval "(setq generate-autoload-cookie \";;;###mh-autoload\")" \ | 375 | --eval "(setq generate-autoload-cookie \";;;###mh-autoload\")" \ |
| 376 | --eval "(setq generated-autoload-file (reveal-filename \"$@\"))" \ | 376 | --eval "(setq generated-autoload-file (unmsys--filename \"$@\"))" \ |
| 377 | --eval "(setq make-backup-files nil)" \ | 377 | --eval "(setq make-backup-files nil)" \ |
| 378 | -f batch-update-autoloads $(MH_E_DIR) | 378 | -f batch-update-autoloads $(MH_E_DIR) |
| 379 | 379 | ||
| @@ -391,7 +391,7 @@ TRAMP_SRC = $(TRAMP_DIR)/tramp.el $(TRAMP_DIR)/tramp-adb.el \ | |||
| 391 | $(TRAMP_DIR)/tramp-loaddefs.el: $(TRAMP_SRC) | 391 | $(TRAMP_DIR)/tramp-loaddefs.el: $(TRAMP_SRC) |
| 392 | $(emacs) -l autoload \ | 392 | $(emacs) -l autoload \ |
| 393 | --eval "(setq generate-autoload-cookie \";;;###tramp-autoload\")" \ | 393 | --eval "(setq generate-autoload-cookie \";;;###tramp-autoload\")" \ |
| 394 | --eval "(setq generated-autoload-file (reveal-filename \"$@\"))" \ | 394 | --eval "(setq generated-autoload-file (unmsys--filename \"$@\"))" \ |
| 395 | --eval "(setq make-backup-files nil)" \ | 395 | --eval "(setq make-backup-files nil)" \ |
| 396 | -f batch-update-autoloads $(TRAMP_DIR) | 396 | -f batch-update-autoloads $(TRAMP_DIR) |
| 397 | 397 | ||
| @@ -413,21 +413,21 @@ CAL_SRC = $(CAL_DIR)/cal-bahai.el $(CAL_DIR)/cal-china.el \ | |||
| 413 | $(CAL_DIR)/cal-loaddefs.el: $(CAL_SRC) | 413 | $(CAL_DIR)/cal-loaddefs.el: $(CAL_SRC) |
| 414 | $(emacs) -l autoload \ | 414 | $(emacs) -l autoload \ |
| 415 | --eval "(setq generate-autoload-cookie \";;;###cal-autoload\")" \ | 415 | --eval "(setq generate-autoload-cookie \";;;###cal-autoload\")" \ |
| 416 | --eval "(setq generated-autoload-file (reveal-filename \"$@\"))" \ | 416 | --eval "(setq generated-autoload-file (unmsys--filename \"$@\"))" \ |
| 417 | --eval "(setq make-backup-files nil)" \ | 417 | --eval "(setq make-backup-files nil)" \ |
| 418 | -f batch-update-autoloads $(CAL_DIR) | 418 | -f batch-update-autoloads $(CAL_DIR) |
| 419 | 419 | ||
| 420 | $(CAL_DIR)/diary-loaddefs.el: $(CAL_SRC) | 420 | $(CAL_DIR)/diary-loaddefs.el: $(CAL_SRC) |
| 421 | $(emacs) -l autoload \ | 421 | $(emacs) -l autoload \ |
| 422 | --eval "(setq generate-autoload-cookie \";;;###diary-autoload\")" \ | 422 | --eval "(setq generate-autoload-cookie \";;;###diary-autoload\")" \ |
| 423 | --eval "(setq generated-autoload-file (reveal-filename \"$@\"))" \ | 423 | --eval "(setq generated-autoload-file (unmsys--filename \"$@\"))" \ |
| 424 | --eval "(setq make-backup-files nil)" \ | 424 | --eval "(setq make-backup-files nil)" \ |
| 425 | -f batch-update-autoloads $(CAL_DIR) | 425 | -f batch-update-autoloads $(CAL_DIR) |
| 426 | 426 | ||
| 427 | $(CAL_DIR)/hol-loaddefs.el: $(CAL_SRC) | 427 | $(CAL_DIR)/hol-loaddefs.el: $(CAL_SRC) |
| 428 | $(emacs) -l autoload \ | 428 | $(emacs) -l autoload \ |
| 429 | --eval "(setq generate-autoload-cookie \";;;###holiday-autoload\")" \ | 429 | --eval "(setq generate-autoload-cookie \";;;###holiday-autoload\")" \ |
| 430 | --eval "(setq generated-autoload-file (reveal-filename \"$@\"))" \ | 430 | --eval "(setq generated-autoload-file (unmsys--filename \"$@\"))" \ |
| 431 | --eval "(setq make-backup-files nil)" \ | 431 | --eval "(setq make-backup-files nil)" \ |
| 432 | -f batch-update-autoloads $(CAL_DIR) | 432 | -f batch-update-autoloads $(CAL_DIR) |
| 433 | 433 | ||
diff --git a/lisp/subr.el b/lisp/subr.el index 9b2c8157ac8..97564875067 100644 --- a/lisp/subr.el +++ b/lisp/subr.el | |||
| @@ -4697,14 +4697,14 @@ as alpha versions." | |||
| 4697 | 4697 | ||
| 4698 | ;; This is used in lisp/Makefile.in and in leim/Makefile.in to | 4698 | ;; This is used in lisp/Makefile.in and in leim/Makefile.in to |
| 4699 | ;; generate file names for autoloads, custom-deps, and finder-data. | 4699 | ;; generate file names for autoloads, custom-deps, and finder-data. |
| 4700 | (defun reveal-filename (file) | 4700 | (defun unmsys--filename (file) |
| 4701 | "Produce the real file name for FILE. | 4701 | "Produce the canonical file name for FILE from its MSYS form. |
| 4702 | 4702 | ||
| 4703 | On systems other than MS-Windows, just returns FILE. | 4703 | On systems other than MS-Windows, just returns FILE. |
| 4704 | On MS-Windows, converts /d/foo/bar form of file names | 4704 | On MS-Windows, converts /d/foo/bar form of file names |
| 4705 | passed by MSYS Make into d:/foo/bar that Emacs can grok. | 4705 | passed by MSYS Make into d:/foo/bar that Emacs can grok. |
| 4706 | 4706 | ||
| 4707 | This function is called from lisp/Makefile." | 4707 | This function is called from lisp/Makefile and leim/Makefile." |
| 4708 | (when (and (eq system-type 'windows-nt) | 4708 | (when (and (eq system-type 'windows-nt) |
| 4709 | (string-match "\\`/[a-zA-Z]/" file)) | 4709 | (string-match "\\`/[a-zA-Z]/" file)) |
| 4710 | (setq file (concat (substring file 1 2) ":" (substring file 2)))) | 4710 | (setq file (concat (substring file 1 2) ":" (substring file 2)))) |