Xebar Saram <zelt...@gmail.com> writes:
> Thx Thorsten
>
> i tried that but that dosent seem to work :) any way i can try to
> debug this (i apologize in advance for my zero lisp knowledge :)
it actually worked, but only with calling the reset function manually
once.
try this:
#+begin_src emacs-lisp
(defvar tj/last-buffer-tick nil)
(make-variable-buffer-local 'tj/last-buffer-tick)
(defun tj/new-buffer-ticks-p ()
(let ((curr-tick (buffer-modified-tick))
(last-tick tj/last-buffer-tick))
(setq tj/last-buffer-tick curr-tick)
(and last-tick (< last-tick curr-tick))))
(defun tj/reset-view-mode ()
(run-with-timer 0 (* 5 60)
(lambda ()
(when (tj/new-buffer-ticks-p)
(view-mode t)))))
(add-hook 'org-mode-hook 'tj/reset-view-mode)
#+end_src
> On Fri, Jul 18, 2014 at 11:54 AM, Thorsten Jolitz <tjol...@gmail.com>
> wrote:
>
> Xebar Saram <zelt...@gmail.com> writes:
>
> > Thx again all, really cool.
> >
> > one last question. anyone mind pasting code to revert an open
> buffer
> > to read only when idle for lets say 5 minutes?
>
>
> you could try this (untested!):
>
> #+begin_src emacs-lisp
> (defvar tj/last-buffer-tick nil)
> (make-variable-buffer-local 'tj/last-buffer-tick)
>
> (add-hook 'org-mode-hook
> (lambda ()
> (setq tj/last-buffer-tick (buffer-modified-tick))))
>
> (defun tj/new-buffer-ticks-p ()
> (let ((curr-tick (buffer-modified-tick))
> (last-tick tj/last-buffer-tick))
> (setq tj/last-buffer-tick curr-tick)
> (< last-tick curr-tick)))
>
> (defun tj/reset-view-mode ()
> (run-with-timer (* 5 60) (* 5 60)
> (lambda ()
> (when (tj/new-buffer-ticks-p)
> (view-mode t)))))
> #+end_src
>
>
>
>
> > On Fri, Jul 18, 2014 at 2:42 AM, Eric Abrahamsen
> > <e...@ericabrahamsen.net> wrote:
> >
> > Xebar Saram <zelt...@gmail.com> writes:
> >
> > > Thanks guys. really appreciate all your help
> > >
> > > im now using view-mode with hooks as suggested. btw whats the
> > > advantages of viewer-mode over read-only-mode
> >
> >
> > Mostly that you get more convenient navigation commands.
> Scrolling
> > and
> > searching etc don't require control modifiers, and it becomes a
> > bit
> > easier to move around files.
> >
> >
> >
> > > best
> > >
> > > Z
> > >
> > >
> > > On Thu, Jul 17, 2014 at 5:46 PM, Jorge A. Alfaro-Murillo <
> > > jorge.a.alf...@gmail.com> wrote:
> > >
> > > Xebar Saram <zelt...@gmail.com> writes:
> > >
> > > > i keep once and a while screwing up my notes with unintended
> > > editing
> > > > (erroneous key presses etc) and was wondering if any one
> knew
> > > of a way
> > > > to to switch orgmode notes between read-only/editing?
> > >
> > > Hi Xebar. Use C-x C-q. This works for every file, I use it in
> > > particular
> > > for notes that I do not want to edit.
> > >
> > > It runs the command read-only-mode which changes whether the
> > > current
> > > buffer is read-only. Actually the command switches the local
> > > variable
> > > buffer-read-only, so you can use that variable as local for
> > every
> > > file
> > > that you do not want to edit by default. At the end of those
> > > files add:
> > >
> > > #+BEGIN_EXAMPLE
> > > %%% Local Variables:
> > > %%% buffer-read-only: t
> > > %%% End:
> > > #+END_EXAMPLE
> > >
> > > And every time that you want to edit them just do C-x C-q
> > >
> > > Best,
> > >
> > > Jorge.
> > >
> > >
> >
> >
> >
> >
> >
>
>
> --
> cheers,
> Thorsten
>
>
>
>
--
cheers,
Thorsten
