diff options
| author | Miles Bader <miles@gnu.org> | 2007-07-24 01:23:55 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2007-07-24 01:23:55 +0000 |
| commit | 40f9398cdba874aa72fd1828534110caa34702be (patch) | |
| tree | ba7af35a2e0a913ccb78095d130ec695e6bfeb97 /src/xdisp.c | |
| parent | 22110b82771c73e38e4c637b90c5d01da3671c24 (diff) | |
| parent | ccb0797a191047816dae47b2e0e7e751027bd0e8 (diff) | |
| download | emacs-40f9398cdba874aa72fd1828534110caa34702be.tar.gz | |
Merge from emacs--devo--0unicode-xft-base
Patches applied:
* emacs--devo--0 (patch 816-823)
- Update from CVS
- Merge from emacs--rel--22
* emacs--rel--22 (patch 59-69)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 237-238)
- Update from CVS
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-235
Diffstat (limited to 'src/xdisp.c')
| -rw-r--r-- | src/xdisp.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/xdisp.c b/src/xdisp.c index 05898c51512..c8c519107ac 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -18144,6 +18144,16 @@ decode_mode_spec (w, c, field_width, precision, multibyte) #endif break; + case 'R': + { + Lisp_Object val; + val = call1 (intern ("file-remote-p"), current_buffer->directory); + if (NILP (val)) + return "-"; + else + return "@"; + } + case 't': /* indicate TEXT or BINARY */ #ifdef MODE_LINE_BINARY_TEXT return MODE_LINE_BINARY_TEXT (b); |