summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1998-08-10 21:13:58 +0000
committerRichard M. Stallman <rms@gnu.org>1998-08-10 21:13:58 +0000
commit852b069a73be360fb7781c83937eb76286207228 (patch)
tree655da42d4b9314c80f6c4af37d8bd90c232a752b
parent33d1d9adaaa1e52289f924f29124729e109824cc (diff)
downloademacs-852b069a73be360fb7781c83937eb76286207228.tar.gz
(time-stamp-string-preprocess): Add %U code.
-rw-r--r--lisp/time-stamp.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/time-stamp.el b/lisp/time-stamp.el
index fd41a345ab6..b7a85400d72 100644
--- a/lisp/time-stamp.el
+++ b/lisp/time-stamp.el
@@ -69,6 +69,7 @@ Non-date items:
%f file name without directory %F gives absolute pathname
%s system name
%u user's login name
+%U user's full name
%h mail host name
Decimal digits between the % and the type character specify the
@@ -445,6 +446,8 @@ With arg, turn time stamping on if and only if arg is positive."
(system-name))
((eq cur-char ?u) ;user name
(user-login-name))
+ ((eq cur-char ?U) ;user full name
+ (user-full-name))
((eq cur-char ?h) ;mail host name
(time-stamp-mail-host-name))
))