Skip to content

Instantly share code, notes, and snippets.

diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 4df6781243..5afd89a473 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -558,6 +558,7 @@ minibuffer-prompt-properties--setter
(mac-pass-command-to-system mac boolean "22.1")
(mac-pass-control-to-system mac boolean "22.1")
(mac-drawing-use-gcd mac boolean "24.4")
+ (mac-use-title-bar mac boolean "25.2")
(mac-frame-tabbing mac (choice (const automatic) (const inverted)
--- mituharu-emacs-mac-7fdbfba85d54/src/macappkit.m 2018-09-08 21:02:50.000000000 -0400
+++ mituharu-emacs-mac/src/macappkit.m 2018-09-11 13:56:12.000000000 -0400
@@ -2074,6 +2074,18 @@
@implementation EmacsWindow
++ (NSButton *)standardWindowButton:(NSWindowButton)b forStyleMask:(NSWindowStyleMask)styleMask
+{
+
+ NSUserDefaults *userDefaults = [NSUserDefaults standardUserDefaults];
set-option -g prefix C-o
set-option -g prefix2 F1
unbind-key C-b
bind-key C-o send-prefix
unbind c
bind-key c neww -c "#{pane_current_path}"
set -g mouse on
set -g history-limit 655350
# todo: grap topic changes
use strict;
use vars qw($VERSION %IRSSI);
use Irssi;
$VERSION = '0.0.3';
%IRSSI = (
authors => 'Thorsten Leemhuis',
contact => 'fedora@leemhuis.info',
@railwaycat
railwaycat / build-emacs.app.sh
Last active May 30, 2018 15:54
build emacs mac port bundle
#!/bin/sh
# usage: ./build-emacs.app.sh <emacs-mac-port-source-directory>
installprefix=`pwd`/emacs-mac-out
app_dir=$installprefix/Emacs.app/Contents/Resources
version=26.1 # update the version nunber
compver=x86_64-apple-darwin`uname -r`
# if you install texinfo by homebrew and key-only
@railwaycat
railwaycat / Emacs_starter.pl
Last active March 12, 2023 01:26
Start Emacs.app from CLI
#!/usr/bin/perl
# Emacs starter for Emacs mac port
# Thanks to Aquamacs Project and David Reitter
my $args = "";
my $tmpfiles = "";
for my $f (@ARGV) {
@railwaycat
railwaycat / mac-switch-meta.el
Created August 28, 2012 13:43
meta key switch
;; Keybonds
(global-set-key [(hyper a)] 'mark-whole-buffer)
(global-set-key [(hyper v)] 'yank)
(global-set-key [(hyper c)] 'kill-ring-save)
(global-set-key [(hyper s)] 'save-buffer)
(global-set-key [(hyper l)] 'goto-line)
(global-set-key [(hyper w)]
(lambda () (interactive) (delete-window)))
(global-set-key [(hyper z)] 'undo)