unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#28566: 25.2; show-paren error
@ 2017-09-23  9:58 Live System User
  2017-09-23 10:33 ` Eli Zaretskii
  0 siblings, 1 reply; 6+ messages in thread
From: Live System User @ 2017-09-23  9:58 UTC (permalink / raw)
  To: 28566


Hi,

        I got the following backtrace error while idle when the
        `show-paren-function`timer went off.

        I don't have a reproducible receipe so please close this
        bug report if this information is insufficient.

        Thanks.

Debugger entered--Lisp error: (wrong-type-argument stringp t)
  message(t)
  (if (not (null matching-text)) (message matching-text))
  (let ((matching-text nil)) (if (char-equal (char-syntax (or (or (char-before (point)) (char-after (point))) 48)) 41) (setq matching-text (blink-matching-open))) (if (not (null matching-text)) (message matching-text)))
  (let (ad-return-value) (setq ad-return-value (with-no-warnings (funcall ad--addoit-function))) (let ((matching-text nil)) (if (char-equal (char-syntax (or (or (char-before ...) (char-after ...)) 48)) 41) (setq matching-text (blink-matching-open))) (if (not (null matching-text)) (message matching-text))) ad-return-value)
  ad-Advice-show-paren-function(#[nil "\b\205	 \211\204\306\v!\210\306\f!\202\346\n@\nA@\307\n8\310\n8\311\n8\211\203<\2038\312 \210\313\202=\314\203[\204b`V\203b`X\203b\250\203b\306\f!\210\202x\315\fp$\210\316\f\317#\210\316\f\320#\210\204\203\306\v!\202\344\321=\204\253\322=\203\316W\203\236S\202\241T\323!)\204\316\315\vW\203\271\202\272W\203\306\202\310p$\210\202\327\315\vp$\210\316\v\317#\210\316\v\320#.)\207" [show-paren-mode show-paren-data-function data show-paren--overlay show-paren--overlay-1 here-beg delete-overlay 2 3 4 beep show-paren-mismatch show-paren-match move-overlay overlay-put priority face expression mixed pos-visible-in-window-p here-end there-beg there-end mismatch show-paren-ring-bell-on-mismatch show-paren-highlight-openparen show-paren-priority show-paren-style closest] 
 6 ("/usr/share/emacs/25.2/lisp/paren.elc" . 7744)])
  apply(ad-Advice-show-paren-function #[nil "\b\205	 \211\204\306\v!\210\306\f!\202\346\n@\nA@\307\n8\310\n8\311\n8\211\203<\2038\312 \210\313\202=\314\203[\204b`V\203b`X\203b\250\203b\306\f!\210\202x\315\fp$\210\316\f\317#\210\316\f\320#\210\204\203\306\v!\202\344\321=\204\253\322=\203\316W\203\236S\202\241T\323!)\204\316\315\vW\203\271\202\272W\203\306\202\310p$\210\202\327\315\vp$\210\316\v\317#\210\316\v\320#.)\207" [show-paren-mode show-paren-data-function data show-paren--overlay show-paren--overlay-1 here-beg delete-overlay 2 3 4 beep show-paren-mismatch show-paren-match move-overlay overlay-put priority face expression mixed pos-visible-in-window-p here-end there-beg there-end mismatch show-paren-ring-bell-on-mismatch show-paren-highlight-openparen show-paren-priority show-paren-style clo
 sest] 6 ("/usr/share/emacs/25.2/lisp/paren.elc" . 7744)] nil)
  show-paren-function()
  apply(show-paren-function nil)
  timer-event-handler([t 0 0 125000 t show-paren-function nil idle 0])




In GNU Emacs 25.2.1 (x86_64-redhat-linux-gnu, GTK+ Version 3.20.10)
 of 2017-05-02 built on buildvm-17.phx2.fedoraproject.org
Windowing system distributor 'Fedora Project', version 11.0.11803000
Configured using:
 'configure --build=x86_64-redhat-linux-gnu
 --host=x86_64-redhat-linux-gnu --program-prefix=
 --disable-dependency-tracking --prefix=/usr --exec-prefix=/usr
 --bindir=/usr/bin --sbindir=/usr/sbin --sysconfdir=/etc
 --datadir=/usr/share --includedir=/usr/include --libdir=/usr/lib64
 --libexecdir=/usr/libexec --localstatedir=/var
 --sharedstatedir=/var/lib --mandir=/usr/share/man
 --infodir=/usr/share/info --with-dbus --with-gif --with-jpeg --with-png
 --with-rsvg --with-tiff --with-xft --with-xpm --with-x-toolkit=gtk3
 --with-gpm=no --with-xwidgets --with-modules
 build_alias=x86_64-redhat-linux-gnu host_alias=x86_64-redhat-linux-gnu
 'CFLAGS=-DMAIL_USE_LOCKF -O2 -g -pipe -Wall -Werror=format-security
 -Wp,-D_FORTIFY_SOURCE=2 -fexceptions -fstack-protector-strong
 --param=ssp-buffer-size=4 -grecord-gcc-switches
 -specs=/usr/lib/rpm/redhat/redhat-hardened-cc1 -m64 -mtune=generic'
 LDFLAGS=-Wl,-z,relro
 PKG_CONFIG_PATH=:/usr/lib64/pkgconfig:/usr/share/pkgconfig'

Configured features:
XPM JPEG TIFF GIF PNG RSVG IMAGEMAGICK SOUND DBUS GCONF GSETTINGS NOTIFY
ACL LIBSELINUX GNUTLS LIBXML2 FREETYPE M17N_FLT LIBOTF XFT ZLIB
TOOLKIT_SCROLL_BARS GTK3 X11 MODULES XWIDGETS

Important settings:
  value of $LANG: en_US.UTF-8
  value of $XMODIFIERS: @im=ibus
  locale-coding-system: utf-8-unix

Major mode: Message

Minor modes in effect:
  mml-mode: t
  tooltip-mode: t
  global-eldoc-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  tool-bar-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  line-number-mode: t
  auto-fill-function: message-do-auto-fill
  transient-mark-mode: t
  abbrev-mode: t

Recent messages:
Checking for load-path shadows...done
Saving file /home/liveuser/.emacs.d/url/cookies...
Wrote /home/liveuser/.emacs.d/url/cookies

Load-path shadows:
None found.

Features:
(shadow emacsbug sendmail sort gnus-cite smiley ansi-color shr-color
color shr dom subr-x browse-url mail-extr gnus-bcklg pp gnus-async qp
gnus-ml disp-table utf-7 nnagent nnml misearch multi-isearch rfc2104
cursor-sensor nndraft nnmh nndoc mm-archive jka-compr timezone url-http
url-gw url-cache url-auth url-handlers nnfolder network-stream nsm
starttls gnus-agent gnus-srvr gnus-score score-mode nnvirtual gnus-msg
nntp gnus-cache epa-file epa derived nnreddit mm-url url url-proxy
url-privacy url-expand url-methods url-history url-cookie url-domsuf
url-util url-parse auth-source cl-seq eieio eieio-core cl-macs url-vars
json map seq byte-opt bytecomp byte-compile cl-extra cconv gnus-art
mm-uu mml2015 mm-view mml-smime smime dig mailcap cl gv sieve sieve-mode
sieve-manage nnir gnus-sum gnus-group gnus-undo gnus-start gnus-cloud
nnimap nnmail mail-source tls gnutls utf7 netrc parse-time gnus-spec
gnus-int gnus-range message dired format-spec rfc822 mml mml-sec
password-cache epg epg-config mm-decode mm-bodies mm-encode mail-parse
rfc2231 rfc2047 rfc2045 ietf-drums mailabbrev gmm-utils mailheader
gnus-win gnus gnus-ems wid-edit nnoo nnheader gnus-util mm-util help-fns
help-mode easymenu cl-loaddefs pcase cl-lib mail-prsvr mail-utils
time-date mule-util tooltip eldoc electric uniquify ediff-hook vc-hooks
lisp-float-type mwheel x-win term/common-win x-dnd tool-bar dnd fontset
image regexp-opt fringe tabulated-list newcomment elisp-mode lisp-mode
prog-mode register page menu-bar rfn-eshadow timer select scroll-bar
mouse jit-lock font-lock syntax facemenu font-core frame cl-generic cham
georgian utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao
korean japanese eucjp-ms cp51932 hebrew greek romanian slovak czech
european ethiopic indian cyrillic chinese charscript case-table epa-hook
jka-cmpr-hook help simple abbrev minibuffer cl-preloaded nadvice
loaddefs button faces cus-face macroexp files text-properties overlay
sha1 md5 base64 format env code-pages mule custom widget
hashtable-print-readable backquote dbusbind inotify dynamic-setting
system-font-setting font-render-setting xwidget-internal move-toolbar
gtk x-toolkit x multi-tty make-network-process emacs)

Memory information:
((conses 16 308012 60850)
 (symbols 48 124772 0)
 (miscs 40 141 289)
 (strings 32 106778 10898)
 (string-bytes 1 3769426)
 (vectors 16 25817)
 (vector-slots 8 690078 12594)
 (floats 8 580 586)
 (intervals 56 5993 0)
 (buffers 976 63)
 (heap 1024 45020 12589))





^ permalink raw reply	[flat|nested] 6+ messages in thread

* bug#28566: 25.2; show-paren error
  2017-09-23  9:58 bug#28566: 25.2; show-paren error Live System User
@ 2017-09-23 10:33 ` Eli Zaretskii
  2017-09-23 10:43   ` Live System User
  0 siblings, 1 reply; 6+ messages in thread
From: Eli Zaretskii @ 2017-09-23 10:33 UTC (permalink / raw)
  To: Live System User; +Cc: 28566

> From: Live System User <nyc4bos@aol.com>
> Date: Sat, 23 Sep 2017 05:58:56 -0400
> 
>         I got the following backtrace error while idle when the
>         `show-paren-function`timer went off.
> 
>         I don't have a reproducible receipe so please close this
>         bug report if this information is insufficient.
> 
>         Thanks.
> 
> Debugger entered--Lisp error: (wrong-type-argument stringp t)
>   message(t)
>   (if (not (null matching-text)) (message matching-text))
>   (let ((matching-text nil)) (if (char-equal (char-syntax (or (or (char-before (point)) (char-after (point))) 48)) 41) (setq matching-text (blink-matching-open))) (if (not (null matching-text)) (message matching-text)))
>   (let (ad-return-value) (setq ad-return-value (with-no-warnings (funcall ad--addoit-function))) (let ((matching-text nil)) (if (char-equal (char-syntax (or (or (char-before ...) (char-after ...)) 48)) 41) (setq matching-text (blink-matching-open))) (if (not (null matching-text)) (message matching-text))) ad-return-value)
>   ad-Advice-show-paren-function(#[nil "\b\205    \211\204\306\v!\210\306\f!\202\

This seems to say you have some advice installed for
show-paren-function.  As the string "matching-text" doesn't appear
anywhere in paren.el (nor anywhere else in the Emacs sources), I'm
guessing that it comes from that advice, and therefore the root cause
for the error should be looked for in that advice.

Can you tell what advice do you have for show-paren-function?





^ permalink raw reply	[flat|nested] 6+ messages in thread

* bug#28566: 25.2; show-paren error
  2017-09-23 10:33 ` Eli Zaretskii
@ 2017-09-23 10:43   ` Live System User
  2017-09-23 11:09     ` Eli Zaretskii
  0 siblings, 1 reply; 6+ messages in thread
From: Live System User @ 2017-09-23 10:43 UTC (permalink / raw)
  To: Eli Zaretskii; +Cc: 28566

Eli Zaretskii <eliz@gnu.org> writes:

>> From: Live System User <nyc4bos@aol.com>
>> Date: Sat, 23 Sep 2017 05:58:56 -0400
>> 
>>         I got the following backtrace error while idle when the
>>         `show-paren-function`timer went off.
>> 
>>         I don't have a reproducible receipe so please close this
>>         bug report if this information is insufficient.
>> 
>>         Thanks.
>> 
>> Debugger entered--Lisp error: (wrong-type-argument stringp t)
>>   message(t)
>>   (if (not (null matching-text)) (message matching-text))
>>   (let ((matching-text nil)) (if (char-equal (char-syntax (or (or (char-before (point)) (char-after (point))) 48)) 41) (setq matching-text (blink-matching-open))) (if (not (null matching-text)) (message matching-text)))
>>   (let (ad-return-value) (setq ad-return-value (with-no-warnings (funcall ad--addoit-function))) (let ((matching-text nil)) (if (char-equal (char-syntax (or (or (char-before ...) (char-after ...)) 48)) 41) (setq matching-text (blink-matching-open))) (if (not (null matching-text)) (message matching-text))) ad-return-value)
>>   ad-Advice-show-paren-function(#[nil "\b\205    \211\204\306\v!\210\306\f!\202\
>
> This seems to say you have some advice installed for
> show-paren-function.  As the string "matching-text" doesn't appear
> anywhere in paren.el (nor anywhere else in the Emacs sources), I'm
> guessing that it comes from that advice, and therefore the root cause
> for the error should be looked for in that advice.
>
> Can you tell what advice do you have for show-paren-function?


;; Show offscreen paren matches in the minibuffer
(defadvice show-paren-function
 (after show-matching-paren-offscreen activate)
 "If the matching paren is offscreen, show the matching line in the
   echo area. Has no effect if the character before point is not of
   the syntax class ')'."
 (interactive)
 (let ((matching-text nil))
   ;; Only call `blink-matching-open' if the character before point is a close
   ;; parentheses type character. Otherwise, there's not really any point, and
   ;; `blink-matching-open' would just echo "Mismatched parentheses", which gets
   ;; really annoying.
   ;; (or ...) is a hack to handle (bobp, eobp) conditions under 24.x.
   (if (char-equal (char-syntax
                     (or (or (char-before (point)) (char-after (point))) ?0)
                     ) ?\))
       (setq matching-text (blink-matching-open)))
   (if (not (null matching-text))
       (message matching-text))))





^ permalink raw reply	[flat|nested] 6+ messages in thread

* bug#28566: 25.2; show-paren error
  2017-09-23 10:43   ` Live System User
@ 2017-09-23 11:09     ` Eli Zaretskii
  2017-09-23 11:46       ` Live System User
  0 siblings, 1 reply; 6+ messages in thread
From: Eli Zaretskii @ 2017-09-23 11:09 UTC (permalink / raw)
  To: Live System User; +Cc: 28566

> From: Live System User <nyc4bos@aol.com>
> Cc: 28566@debbugs.gnu.org
> Date: Sat, 23 Sep 2017 06:43:10 -0400
> 
> ;; Show offscreen paren matches in the minibuffer
> (defadvice show-paren-function
>  (after show-matching-paren-offscreen activate)
>  "If the matching paren is offscreen, show the matching line in the
>    echo area. Has no effect if the character before point is not of
>    the syntax class ')'."
>  (interactive)
>  (let ((matching-text nil))
>    ;; Only call `blink-matching-open' if the character before point is a close
>    ;; parentheses type character. Otherwise, there's not really any point, and
>    ;; `blink-matching-open' would just echo "Mismatched parentheses", which gets
>    ;; really annoying.
>    ;; (or ...) is a hack to handle (bobp, eobp) conditions under 24.x.
>    (if (char-equal (char-syntax
>                      (or (or (char-before (point)) (char-after (point))) ?0)
>                      ) ?\))
>        (setq matching-text (blink-matching-open)))
>    (if (not (null matching-text))
>        (message matching-text))))

The return value of blink-matching-open is not documented, so it could
be anything.  I'd suggest to replace the last 2 lines with

   (if (stringp matching-text)
       (message "%s" matching-text))

OK to close this bug report?





^ permalink raw reply	[flat|nested] 6+ messages in thread

* bug#28566: 25.2; show-paren error
  2017-09-23 11:09     ` Eli Zaretskii
@ 2017-09-23 11:46       ` Live System User
  2017-09-23 12:12         ` Eli Zaretskii
  0 siblings, 1 reply; 6+ messages in thread
From: Live System User @ 2017-09-23 11:46 UTC (permalink / raw)
  To: Eli Zaretskii; +Cc: 28566

Eli Zaretskii <eliz@gnu.org> writes:

[...]

>>    (if (not (null matching-text))
>>        (message matching-text))))
>
> The return value of blink-matching-open is not documented, so it could
> be anything.  I'd suggest to replace the last 2 lines with
>
>    (if (stringp matching-text)
>        (message "%s" matching-text))
>
> OK to close this bug report?

  Yes; and thank you for your sugestion !





^ permalink raw reply	[flat|nested] 6+ messages in thread

* bug#28566: 25.2; show-paren error
  2017-09-23 11:46       ` Live System User
@ 2017-09-23 12:12         ` Eli Zaretskii
  0 siblings, 0 replies; 6+ messages in thread
From: Eli Zaretskii @ 2017-09-23 12:12 UTC (permalink / raw)
  To: Live System User; +Cc: 28566-done

> From: Live System User <nyc4bos@aol.com>
> CC: 28566@debbugs.gnu.org
> Date: Sat, 23 Sep 2017 07:46:56 -0400
> 
> Eli Zaretskii <eliz@gnu.org> writes:
> 
> [...]
> 
> >>    (if (not (null matching-text))
> >>        (message matching-text))))
> >
> > The return value of blink-matching-open is not documented, so it could
> > be anything.  I'd suggest to replace the last 2 lines with
> >
> >    (if (stringp matching-text)
> >        (message "%s" matching-text))
> >
> > OK to close this bug report?
> 
>   Yes; and thank you for your sugestion !

You are welcome.





^ permalink raw reply	[flat|nested] 6+ messages in thread

end of thread, other threads:[~2017-09-23 12:12 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2017-09-23  9:58 bug#28566: 25.2; show-paren error Live System User
2017-09-23 10:33 ` Eli Zaretskii
2017-09-23 10:43   ` Live System User
2017-09-23 11:09     ` Eli Zaretskii
2017-09-23 11:46       ` Live System User
2017-09-23 12:12         ` Eli Zaretskii

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).