Parent Directory | Revision Log | Patch
revision 1.30 by rms, Sun Apr 10 23:32:00 2005 UTC | revision 1.31 by rms, Sat Apr 23 16:40:24 2005 UTC | |
---|---|---|
# | Line 166 To save places automatically in all file | Line 166 To save places automatically in all file |
166 | (let ((cell (assoc buffer-file-name save-place-alist)) | (let ((cell (assoc buffer-file-name save-place-alist)) |
167 | (position (if (not (eq major-mode 'hexl-mode)) | (position (if (not (eq major-mode 'hexl-mode)) |
168 | (point) | (point) |
169 | (1+ (hexl-current-address))))) | (with-no-warnings |
170 | (1+ (hexl-current-address)))))) | |
171 | (if cell | (if cell |
172 | (setq save-place-alist (delq cell save-place-alist))) | (setq save-place-alist (delq cell save-place-alist))) |
173 | (if (and save-place | (if (and save-place |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |