[elpa] externals/web-server ebc6419 3/5: * web-server/examples: Don't load `htmlize' during byte-compilation

[Stefan Monnier]

branch: externals/web-server
commit ebc6419447195d2764d9c799e96395125b46a5f3
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * web-server/examples: Don't load `htmlize' during byte-compilation
    
    * web-server/examples/015-auto-mode-server.el: Use lexical-binding
    rather than lexical-let.
---
 examples/010-current-buffer.el   | 2 +-
 examples/011-org-agenda.el       | 2 +-
 examples/015-auto-mode-server.el | 8 ++++----
 web-server.el                    | 2 +-
 4 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/examples/010-current-buffer.el b/examples/010-current-buffer.el
index 8a651ac..ac937ac 100644
--- a/examples/010-current-buffer.el
+++ b/examples/010-current-buffer.el
@@ -1,7 +1,7 @@
 ;;; current-buffer.el --- Show the current Emacs buffer
 ;; Copyright (C) 2014  Free Software Foundation, Inc.
 
-(require 'htmlize)
+(if t (require 'htmlize))               ;Don't require during compilation.
 
 (ws-start
  (lambda (request)
diff --git a/examples/011-org-agenda.el b/examples/011-org-agenda.el
index 6bca980..9e97ca2 100644
--- a/examples/011-org-agenda.el
+++ b/examples/011-org-agenda.el
@@ -1,7 +1,7 @@
 ;;; org-agenda.el --- display the Org-mode agenda
 ;; Copyright (C) 2014  Free Software Foundation, Inc.
 
-(require 'htmlize)
+(if t (require 'htmlize))               ;Don't require during compilation.
 
 (ws-start
  (lambda (request)
diff --git a/examples/015-auto-mode-server.el b/examples/015-auto-mode-server.el
index 5a36a93..c9ae294 100644
--- a/examples/015-auto-mode-server.el
+++ b/examples/015-auto-mode-server.el
@@ -1,9 +1,9 @@
-;;; auto-mode-server.el --- files with fontification from the `auto-mode-alist'
-;; Copyright (C) 2014  Free Software Foundation, Inc.
+;;; auto-mode-server.el --- files with fontification from the 
`auto-mode-alist'  -*- lexical-binding:t -*-
+;; Copyright (C) 2014, 2016  Free Software Foundation, Inc.
 
-(require 'htmlize)
+(if t (require 'htmlize))               ;Don't require during compilation.
 
-(lexical-let ((docroot default-directory))
+(let ((docroot default-directory))
   (ws-start
    (lambda (request)
      (with-slots (process headers) request
diff --git a/web-server.el b/web-server.el
index 9b70a95..f9a1cfa 100644
--- a/web-server.el
+++ b/web-server.el
@@ -1,6 +1,6 @@
 ;;; web-server.el --- Emacs Web Server -*- lexical-binding: t -*-
 
-;; Copyright (C) 2013-2014 Free Software Foundation, Inc.
+;; Copyright (C) 2013-2020 Free Software Foundation, Inc.
 
 ;; Author: Eric Schulte <schulte.eric@gmail.com>
 ;; Maintainer: Eric Schulte <schulte.eric@gmail.com>