Mercurial > emacs
comparison lisp/simple.el @ 10525:8c7043925702
(mark): If transient-mark-mode is nil, mark is active.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Mon, 23 Jan 1995 22:37:46 +0000 |
parents | 3eb77f03f53e |
children | b357342180c2 |
comparison
equal
deleted
inserted
replaced
10524:92d4e8fc0942 | 10525:8c7043925702 |
---|---|
1339 even if the mark is not currently active, and return nil | 1339 even if the mark is not currently active, and return nil |
1340 if there is no mark at all. | 1340 if there is no mark at all. |
1341 | 1341 |
1342 If you are using this in an editing command, you are most likely making | 1342 If you are using this in an editing command, you are most likely making |
1343 a mistake; see the documentation of `set-mark'." | 1343 a mistake; see the documentation of `set-mark'." |
1344 (if (or force mark-active mark-even-if-inactive) | 1344 (if (or force (not transient-mark-mode) mark-active mark-even-if-inactive) |
1345 (marker-position (mark-marker)) | 1345 (marker-position (mark-marker)) |
1346 (signal 'mark-inactive nil))) | 1346 (signal 'mark-inactive nil))) |
1347 | 1347 |
1348 ;; Many places set mark-active directly, and several of them failed to also | 1348 ;; Many places set mark-active directly, and several of them failed to also |
1349 ;; run deactivate-mark-hook. This shorthand should simplify. | 1349 ;; run deactivate-mark-hook. This shorthand should simplify. |