Mercurial > hg > xemacs-beta
comparison man/lispref/files.texi @ 70:131b0175ea99 r20-0b30
Import from CVS: tag r20-0b30
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:02:59 +0200 |
parents | 05472e90ae02 |
children | b980b6286996 |
comparison
equal
deleted
inserted
replaced
69:804d1389bcd6 | 70:131b0175ea99 |
---|---|
453 mechanisms for visiting. | 453 mechanisms for visiting. |
454 | 454 |
455 @deffn Command append-to-file start end filename | 455 @deffn Command append-to-file start end filename |
456 This function appends the contents of the region delimited by | 456 This function appends the contents of the region delimited by |
457 @var{start} and @var{end} in the current buffer to the end of file | 457 @var{start} and @var{end} in the current buffer to the end of file |
458 @var{filename}. If that file does not exist, it is created. If that | 458 @var{filename}. If that file does not exist, it is created. This |
459 file exists it is overwritten. This function returns @code{nil}. | 459 function returns @code{nil}. |
460 | 460 |
461 An error is signaled if @var{filename} specifies a nonwritable file, | 461 An error is signaled if @var{filename} specifies a nonwritable file, |
462 or a nonexistent file in a directory where files cannot be created. | 462 or a nonexistent file in a directory where files cannot be created. |
463 @end deffn | 463 @end deffn |
464 | 464 |
1565 | 1565 |
1566 @c Emacs 19 feature | 1566 @c Emacs 19 feature |
1567 @defun file-relative-name filename &optional directory | 1567 @defun file-relative-name filename &optional directory |
1568 This function does the inverse of expansion---it tries to return a | 1568 This function does the inverse of expansion---it tries to return a |
1569 relative name that is equivalent to @var{filename} when interpreted | 1569 relative name that is equivalent to @var{filename} when interpreted |
1570 relative to @var{directory}. | 1570 relative to @var{directory}. (If such a relative name would be longer |
1571 than the absolute name, it returns the absolute name instead.) | |
1571 | 1572 |
1572 @c XEmacs feature? | 1573 @c XEmacs feature? |
1573 If @var{directory} is @code{nil} or omitted, the value of | 1574 If @var{directory} is @code{nil} or omitted, the value of |
1574 @code{default-directory} is used. | 1575 @code{default-directory} is used. |
1575 | 1576 |
1576 @example | 1577 @example |
1577 (file-relative-name "/foo/bar" "/foo/") | 1578 (file-relative-name "/foo/bar" "/foo/") |
1578 @result{} "bar") | 1579 @result{} "bar") |
1579 (file-relative-name "/foo/bar" "/hack/") | 1580 (file-relative-name "/foo/bar" "/hack/") |
1580 @result{} "../foo/bar") | 1581 @result{} "/foo/bar") |
1581 @end example | 1582 @end example |
1582 @end defun | 1583 @end defun |
1583 | 1584 |
1584 @defvar default-directory | 1585 @defvar default-directory |
1585 The value of this buffer-local variable is the default directory for the | 1586 The value of this buffer-local variable is the default directory for the |