@@ -14,11 +14,13 @@
 ;; 
 ;;     You should have received a copy of the GNU General Public License
 ;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.
 
 (require-library srfi-4 iup)
-(import srfi-4 iup iup-pplot iup-glcanvas) ;; iup-web
+(import srfi-4 iup
+	;; iup-pplot
+	iup-glcanvas) ;; iup-web
 
 (define (popup dlg . args)
   (apply show dlg #:modal? 'yes args)
   (destroy! dlg))
 
@@ -132,11 +134,11 @@
         (button "matrix"
                 action: (lambda (self) (properties (matrix))))
         (fill)
         margin: '0x0)
       (hbox
-        (button "pplot"
+        #;(button "pplot"
                 action: (lambda (self) (properties (pplot))))
         (button "glcanvas"
                 action: (lambda (self) (properties (glcanvas))))
         ;; (button "web-browser"
         ;;         action: (lambda (self) (properties (web-browser))))