Skip to content
GitLab
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
d3f0879b
Commit
d3f0879b
authored
Jan 18, 2001
by
Joel Rosdahl
Browse files
Keep viewed text in cache a bit longer so that it won't be prefetched a second time.
parent
9480dda2
Changes
2
Hide whitespace changes
Inline
Side-by-side
src/ChangeLog
View file @
d3f0879b
2001-01-18 Joel Rosdahl <joel@rosdahl.net>
* view-text.el (lyskom-print-text): Keep viewed text in cache a
bit longer so that it won't be prefetched a second time.
(lyskom-view-text): Ditto.
2001-01-02 Ulrik Haugen <qha@lysator.liu.se>
* All files changed when I replaced
...
...
src/view-text.el
View file @
d3f0879b
...
...
@@ -325,6 +325,8 @@ Note that this function must not be called asynchronously."
(
lyskom-follow-comments
text-stat
conf-stat
mark-as-read
priority
build-review-tree
)))
(
if
(
lyskom-text-p
(
cache-get-text
text-no
))
(
cache-del-text
text-no
))
))
(
lyskom-format-insert
'no-such-text-no
text-no
))
(
let
((
aux-items
(
text-stat->aux-items
text-stat
)))
...
...
@@ -841,8 +843,6 @@ Args: TEXT-STAT TEXT MARK-AS-READ TEXT-NO FLAT-REVIEW."
(
lyskom-insert
"\n"
)
(
lyskom-format-insert
"%#1t\n"
(
cons
text-stat
str
))
(
setq
lyskom-current-subject
""
)))
(
if
(
lyskom-text-p
(
cache-get-text
(
text->text-no
text
)))
(
cache-del-text
(
text->text-no
text
)))
(
sit-for
0
)
(
let*
((
lyskom-current-function-phase
'footer
)
(
mx-from
(
car
(
lyskom-get-aux-item
(
text-stat->aux-items
text-stat
)
17
)))
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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