File tree Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Expand file tree Collapse file tree 1 file changed +4
-4
lines changed Original file line number Diff line number Diff line change @@ -253,9 +253,9 @@ Copies the URL into the kill ring.
253
253
254
254
With a prefix argument, makes a private paste."
255
255
(interactive " P" )
256
- (condition-case nil
256
+ (if ( region-active-p )
257
257
(gist-region (point ) (mark ) private)
258
- (mark-inactive ( gist-buffer private) )))
258
+ (gist-buffer private)))
259
259
260
260
;;;### autoload
261
261
(defun gist-region-or-buffer-private ()
@@ -264,9 +264,9 @@ With a prefix argument, makes a private paste."
264
264
265
265
Copies the URL into the kill ring."
266
266
(interactive )
267
- (condition-case nil
267
+ (if ( region-active-p )
268
268
(gist-region-private (point ) (mark ))
269
- (mark-inactive ( gist-buffer-private) )))
269
+ (gist-buffer-private)))
270
270
271
271
;;;### autoload
272
272
(defun gist-list-user (username &optional force-reload background )
You can’t perform that action at this time.
0 commit comments