* progmodes/compile.el: (compilation-start): Abbreviate default directory.
This commit is contained in:
parent
ff5dec5cd1
commit
3b548e1b3a
2 changed files with 14 additions and 9 deletions
|
|
@ -1,16 +1,20 @@
|
|||
2010-04-23 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* progmodes/compile.el (compilation-start): Abbreviate default directory.
|
||||
|
||||
2010-04-23 Michael Albinus <michael.albinus@gmx.de>
|
||||
|
||||
Implement SELINUX backends.
|
||||
|
||||
* net/tramp.el (tramp-file-name-handler-alist): Add
|
||||
`file-selinux-context' and `set-file-selinux-context'.
|
||||
* net/tramp.el (tramp-file-name-handler-alist):
|
||||
Add `file-selinux-context' and `set-file-selinux-context'.
|
||||
(tramp-handle-file-selinux-context)
|
||||
(tramp-handle-set-file-selinux-context): New defuns.
|
||||
(tramp-handle-copy-file, tramp-do-copy-or-rename-file): Handle
|
||||
PRESERVE-SELINUX-CONTEXT.
|
||||
(tramp-handle-copy-file, tramp-do-copy-or-rename-file):
|
||||
Handle PRESERVE-SELINUX-CONTEXT.
|
||||
|
||||
* net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist): Add
|
||||
`file-selinux-context' and `set-file-selinux-context'.
|
||||
* net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist):
|
||||
Add `file-selinux-context' and `set-file-selinux-context'.
|
||||
(tramp-gvfs-handle-file-selinux-context)
|
||||
(tramp-gvfs-handle-set-file-selinux-context): New defuns.
|
||||
(tramp-gvfs-handle-copy-file): Handle PRESERVE-SELINUX-CONTEXT.
|
||||
|
|
@ -18,8 +22,8 @@
|
|||
* net/ange-ftp.el (ange-ftp-copy-file):
|
||||
* net/tramp-fish.el (tramp-fish-handle-copy-file):
|
||||
* net/tramp-imap.el (tramp-imap-handle-copy-file):
|
||||
* net/tramp-smb.el (tramp-smb-handle-copy-file): Add
|
||||
PRESERVE-SELINUX-CONTEXT.
|
||||
* net/tramp-smb.el (tramp-smb-handle-copy-file):
|
||||
Add PRESERVE-SELINUX-CONTEXT.
|
||||
|
||||
2010-04-22 Michael Albinus <michael.albinus@gmx.de>
|
||||
|
||||
|
|
|
|||
|
|
@ -1265,7 +1265,8 @@ Returns the compilation buffer created."
|
|||
(set (make-local-variable 'compilation-auto-jump-to-next) t))
|
||||
;; Output a mode setter, for saving and later reloading this buffer.
|
||||
(insert "-*- mode: " name-of-mode
|
||||
"; default-directory: " (prin1-to-string default-directory)
|
||||
"; default-directory: "
|
||||
(prin1-to-string (abbreviate-file-name default-directory))
|
||||
" -*-\n"
|
||||
(format "%s started at %s\n\n"
|
||||
mode-name
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue