Form to store/recover buffer modified state?

[Joakim Hove]

Hello,

I have some buffer manipulating[1] functions which are wrapped in a
construct like this:

(let ((modified (buffer-modified-p)))
  ;;
  (lots of code)
  ;;
  (if (not modified) (set-buffer-modifed-p nil)))

To ensure that the buffer is not marked as modified when the function
has finished executing.  Is there a special form, i.e. resembling
(save-excursion ) to achieve this?


regards Joakim


[1] The manipulations in question are typically text properties,
    i.e. manipulations which should not be saved.



-- 
  /--------------------------------------------------------------------\
 / Joakim Hove  / hove@bccs.no  /  (55 5) 84076       |                 \
 | Unifob AS, Avdeling for Beregningsvitenskap (BCCS) | Stabburveien 18 |
 | CMU                                                | 5231 Paradis    |
 \ Thormøhlensgt.55, 5020 Bergen.                     | 55 91 28 18     /
  \--------------------------------------------------------------------/