diff options
| author | Eli Zaretskii | 2001-06-17 11:23:58 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2001-06-17 11:23:58 +0000 |
| commit | a28eaf2c9b61be1a7d73b9e4a763c39716ffeee9 (patch) | |
| tree | 75e71c7c604fec084bafe4ab14df216fd031ba67 /lisp | |
| parent | 2ddf19dfe0387071066ac2f27ab2e96695083bac (diff) | |
| download | emacs-a28eaf2c9b61be1a7d73b9e4a763c39716ffeee9.tar.gz emacs-a28eaf2c9b61be1a7d73b9e4a763c39716ffeee9.zip | |
(tar-header-block-summarize): Add help-echo to mouse-highlighted text.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/tar-mode.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el index 3a952e5d636..86e05ac269e 100644 --- a/lisp/tar-mode.el +++ b/lisp/tar-mode.el | |||
| @@ -366,7 +366,9 @@ MODE should be an integer which is a file mode value." | |||
| 366 | (if (= 0 (length gname)) gid gname) | 366 | (if (= 0 (length gname)) gid gname) |
| 367 | size | 367 | size |
| 368 | (if tar-mode-show-date (tar-clip-time-string time) "") | 368 | (if tar-mode-show-date (tar-clip-time-string time) "") |
| 369 | (propertize name 'mouse-face 'highlight) | 369 | (propertize name |
| 370 | 'mouse-face 'highlight | ||
| 371 | 'help-echo "mouse-2: extract this file into a buffer") | ||
| 370 | (if (or (eq type 1) (eq type 2)) | 372 | (if (or (eq type 1) (eq type 2)) |
| 371 | (concat (if (= type 1) " ==> " " --> ") link-name) | 373 | (concat (if (= type 1) " ==> " " --> ") link-name) |
| 372 | "")))) | 374 | "")))) |