🚀 go-pugleaf

When I turn off selective display, point seems to move to some random
location.  I tried to remember point and goto-char, but this doesn't
seem to help.

Even something as simple as: 
    (set-selective-display 16)
    moving the point somewhere below, but not on, a hidden line
    (set-selective-display nil)
results in point jumping to a random place.

I wanted this as a way to hide a level of a program, move to the
section I wanted to be in and then to remove the hiding.  If I can't
cancel the selective display without losing my place, it isn't much
good.  Any idea why this doesn't work?

    (defun point-selective-display()
	(interactive)
	(let ((arg (current-column))
	      (was (point))
	      )
	  (if (zerop arg)
	      (set-selective-display nil)
	    (set-selective-display arg)
	    )
	  (goto-char was)
	  )
	)

    (define-key global-map "\C-x$" 'point-selective-display)

Gary Levin/Bellcore PYA 1E132/Piscataway, NJ 08854
(908)699-3754  base!gary    gary@base.bellcore.com
--
Gary Levin/Bellcore PYA 1E132/Piscataway, NJ 08854
(908)699-3754  base!gary    gary@base.bellcore.com