Lines Matching +defs:save +defs:point
55 ["Save object" eudc-bob-save-object t]))
67 ["Play sound" eudc-bob-play-sound-at-point
72 "Jump to the window and point where EVENT occurred."
73 (if (fboundp 'event-closest-point)
74 (goto-char (event-closest-point event))
76 (goto-char (posn-point (event-start event)))))
80 (let ((overlays (append (overlays-at (1- (point)))
81 (overlays-at (point))))
104 (p (point))
107 (put-text-property p (point) 'face 'bold)
108 (setq overlay (make-overlay p (point)))
121 "Display the JPEG DATA at point.
153 (let ((overlays (append (overlays-at (1- (point)))
154 (overlays-at (point))))
169 (let* ((overlays (append (overlays-at (1- (point)))
170 (overlays-at (point))))
207 (defun eudc-bob-play-sound-at-point ()
208 "Play the sound data contained in the button at point."
220 (save-excursion
222 (eudc-bob-play-sound-at-point)))
224 (defun eudc-bob-save-object ()
225 "Save the object data of the button at point."
229 (save-excursion
235 (save-buffer))
239 "Pipe the object data of the button at point to an external program."
246 (save-excursion
253 (call-process-region (point-min) (point-max)
256 (call-process-region (point-min) (point-max) program)))
283 (define-key map "s" 'eudc-bob-save-object)
297 (define-key map [return] 'eudc-bob-play-sound-at-point)
305 (define-key map [return] 'browse-url-at-point)
313 (define-key map [return] 'goto-address-at-point)
361 "Display the JPEG DATA inline at point if possible."