Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
lyskom-elisp-client
lyskom-elisp-client
Commits
19cf057d
Commit
19cf057d
authored
Aug 31, 2000
by
Ulrik Haugen
Browse files
removed som useless code I just checked in...
parent
23010255
Changes
2
Hide whitespace changes
Inline
Side-by-side
src/ChangeLog
View file @
19cf057d
2000-08-31 Ulrik Haugen <qha@lysator.liu.se>
* lyskom-rest.el (lyskom-trim-buffer):
s
aves point and mark and
* lyskom-rest.el (lyskom-trim-buffer):
S
aves point and mark and
resets point, mark and lyskom-last-viewed after taking into
consideration lyskom-trim-buffer-delete-to.
(lyskom-trim-buffer): Except point and mark doesn't need this
treatment.
Thu Aug 31 14:38:34 2000 David Byers <davby@sen2.ida.liu.se>
...
...
src/lyskom-rest.el
View file @
19cf057d
...
...
@@ -781,8 +781,6 @@ returns t if it trimmed the buffer, nil otherwise."
(
lyskom-save-excursion
(
let
((
lyskom-trim-buffer-delete-to
(
-
(
buffer-size
)
kom-max-buffer-size
))
(
old-point
(
point
))
(
old-mark
(
mark
))
(
inhibit-read-only
t
))
(
goto-char
(
point-min
))
(
while
(
<
(
point
)
lyskom-trim-buffer-delete-to
)
...
...
@@ -790,11 +788,8 @@ returns t if it trimmed the buffer, nil otherwise."
(
setq
lyskom-trim-buffer-delete-to
(
point
))
(
run-hooks
'lyskom-trim-buffer-hook
)
(
delete-region
(
point-min
)
lyskom-trim-buffer-delete-to
)
(
setq
lyskom-last-viewed
(
-
(
+
lyskom-last-viewed
1
)
lyskom-trim-buffer-delete-to
))
(
set-mark
(
-
(
+
old-mark
1
)
lyskom-trim-buffer-delete-to
))
(
goto-char
(
-
(
+
old-point
1
)
lyskom-trim-buffer-delete-to
))))
(
-
lyskom-last-viewed
-1
lyskom-trim-buffer-delete-to
))))
t
))
(
defun
lyskom-garb-lyskom-buffer-to-file
()
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment