unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
From: "Clément Pit--Claudel" <clement.pit@gmail.com>
To: Chris Feng <chris.w.feng@gmail.com>
Cc: Emacs developers <emacs-devel@gnu.org>
Subject: Re: Could x-show-tip be reimplemented in Elisp? How does one create borderless frames from Elisp?
Date: Fri, 12 Feb 2016 22:35:43 -0500	[thread overview]
Message-ID: <56BEA48F.9020400@gmail.com> (raw)
In-Reply-To: <CAP4=87FBjKi=44Q+WLk4hd_vwbzwQyyw8HD=GNHb=zFVqPhydA@mail.gmail.com>

[-- Attachment #1: Type: text/plain, Size: 2093 bytes --]

On 02/12/2016 09:15 PM, Chris Feng wrote:
> I think the relevant part in 'x_create_tip_frame' is actually:
> 
>   attrs.override_redirect = True;
> 
> What you want to do is to remove the decoration added by the window
> manager.  So you need to set the override-redirect flag on that X
> window.

You're right; thanks! I was navigating the C sources and reached that conclusion as your email came :)

It doesn't seem that there's any Elisp level facility to customize this flag, unfortunately. This means in particular that unless we patch the C sources, there won't be a cross platform solution to this issue, right?

I've started thinking at what a patch would look like; presumably the idea would be to expose the functionality of x_create_tip_frame to Elisp, moving parts of x_show_tip into that function. I could try coming up with a patch, if this is deemed useful.

There's one thing that confuses me, however: some code related to tooltips seems to be duplicated between xfns.c, w32fns.c, etc; are these files auto-generated? Or should I prepare a patch that adjusts all copies of that code?

>> Is there a way to create a borderless frame from Elisp?
> 
> You may have a look at XELB (available on ELPA).  The following code
> should create a frame without decoration.
> 
>   (require 'xcb)
> 
>   (setq frame (make-frame '((visibility . nil))))
> 
>   (let ((window (string-to-number (frame-parameter frame 'outer-window-id)))
>         (connection (xcb:connect-to-socket)))
>     (xcb:+request connection
>         (make-instance 'xcb:ChangeWindowAttributes
>                        :window window
>                        :value-mask xcb:CW:OverrideRedirect
>                        :override-redirect 1))
>     (xcb:flush connection)
>     (xcb:disconnect connection))
> 
>   (make-frame-visible frame)

This is really neat, actually :) Thanks a lot! It works great on my machine.
I'd still like to find a cross-platform solution, though; company isn't X-specific. Am I right to think that this will only work on GNU/Linux?

Clément.


[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 836 bytes --]

  reply	other threads:[~2016-02-13  3:35 UTC|newest]

Thread overview: 28+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2016-02-12 15:01 Could x-show-tip be reimplemented in Elisp? How does one create borderless frames from Elisp? Clément Pit--Claudel
2016-02-13  2:15 ` Chris Feng
2016-02-13  3:35   ` Clément Pit--Claudel [this message]
2016-02-13  3:57     ` Chris Feng
2016-02-16 20:12       ` Creating a "borderless" frame (without WM chrome) (was Re: Could x-show-tip be reimplemented in Elisp? How does one create borderless frames from Elisp?) Clément Pit--Claudel
2016-02-16 22:41         ` Chris Feng
2016-02-16 22:55           ` Clément Pit--Claudel
2016-02-16 23:14             ` Chris Feng
2016-02-16 23:46               ` Clément Pit--Claudel
2016-02-17  9:13                 ` martin rudalics
2016-02-17 13:49                   ` Chris Feng
2016-02-17 14:55                     ` Clément Pit--Claudel
2016-02-18  1:28                       ` Chris Feng
2016-02-17 14:57                   ` Clément Pit--Claudel
2016-02-18 10:51                     ` martin rudalics
2016-02-14 14:05     ` Could x-show-tip be reimplemented in Elisp? How does one create borderless frames from Elisp? Stefan Monnier
2016-02-14 16:44       ` Eli Zaretskii
2016-02-14 17:19         ` Stefan Monnier
2016-02-14 18:00           ` Eli Zaretskii
2016-02-16 20:06       ` Clément Pit--Claudel
2016-02-15 10:57 ` martin rudalics
2016-02-15 13:31   ` Stefan Monnier
2016-02-16 20:06     ` Clément Pit--Claudel
2016-02-16 20:05   ` Clément Pit--Claudel
2016-02-16 21:33     ` Johan Bockgård
2016-02-16 22:18       ` Clément Pit--Claudel
2016-02-17  9:12     ` martin rudalics
2016-02-17 14:26       ` Clément Pit--Claudel

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=56BEA48F.9020400@gmail.com \
    --to=clement.pit@gmail.com \
    --cc=chris.w.feng@gmail.com \
    --cc=emacs-devel@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
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).